
1700 MAIN ST. • SANTA MONICA • CALIFCSN! A 
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Dear Chuck: 

Paul asked me to send you the enclosed examples . The 
copy of the letter to Bert will provide context . 
Would appreciate your comments, and the materials 
you used on your high school class . 
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Hugh S.YKelly 
Computer Sciences Department 
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Dr. Bert Green 
Department of Psychology 
Carnegie Institute of technology 
Pittsburgh 13/ Pennsylvania 

Dear Bert; 

I as enclosing a rough draft of examples and some 
problems based on thera, roainly to gat your reaction 
to the proposed layout. At Paul's suggestion* Stoff 
and I plan to combine the exorcises and the logic 
theorist in one HI 5* . ♦Part I for the exorcised, Part XI 
for LT. £here has been some indication that Prentice -Ball 
might be willing to publish it. 

I* a not completely sold on the enclosed layout for Part I, 
but let me argue in favor of it first, 

1. Putting the emniplee all in -Section 1 with a brief 
corsaent for each makes Section 1 independent of 
the problems „ One can plow through this whole 
section rather quickly and get a good picture of 
IPL, " * * 

2* She examples can be arranged to correspond closely 
to the introduction of concepts in Part I of the 
normal, so the instructor can assign, reading from 
the saanual corresponding examples, 

3. Problem statements are cleaner, shorter and more 
precise > since they need only raention the name of 

• the structures to be manipulated. Several" problems 
can bo based on the sasuo structure or one problem 
can mention several structures without repeating 
the explanation and presentation of the data. 

4. A problem statement can point to an example in 
Section 1 as a hint or nodel to guide the student ♦ 
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The big disadvantage ox* this scherse is that in working a 
oroblcia, the student has to refer hack to the examples to 
get the data for the problem. I find this very annoying 
and a bit confusing* so say the word and 1*11 carabine 
Section 1 and 2# 

Here are some other questions to consider: 

1, How many problems and examples do we want? fifty 
of each? one hundred of each? 

2» Should each example refer to the appropriate pages 
in Part I of the manual? problems too? 

3* Should we include the brief definition of the J*s 
in this RM? If so> should they refer to the page 
in the manual where the full definition is given, 
or should we collect and include the full definitions? 

4. Where would you like to see printline-readiine, save 
for restart* restart j, snapshot debugging introduced? 
They aren't covered in Part I of the manual, 

5. I think the enclosed nrobieias 5 through 12 are 
already pretty tough. How about sone very sinple 
cxamoles and Droolers, not necessarily related to 
Iff? " I have many of those , courtesy of Ed Feigenbaum 
and Bob Hsu, Drills on the use of £ and 2 codes 
for exainplo, 

6. I object to providing drivers for the student* s 
solutions ♦ f fhey can and should learn to make up 
their own decks early in the garac. (See example 

3 and 4») It would be nice to provide the instructor 
with a routine that would accept complete 'docks from 
the student and check the solution by running then, 
but X don't think there is enough sonsy in the pot 
to do this, therefore, I propose that we include a 
couple of drivers as examples and then let the 
instructors decide whether he will ran the student's 
codes or they should code drivers and run their own. 
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7. I think the examples should show alternative IPL 
representations of external objects, that problems 
should be stated in terras of the external objects 
rather than in terms of lists and symbols, and a 
given problem should have to be solved for a couple 
of different representations. If you agree, do you 
prefer separate problem statements (e.g., problem 
10 and 11) or just one, as in problem 12? 

3. I have access to GPS, Baseball, Kap, L r f, HO, etc, 
and plan to use data structures from these where 
oosslbie. LT doesn't have enough variety by 
itself. O.K.? 

9. Is the commentary with the enclosed examples 
appropriate^ too long, too short? 

Guess that * s about it. Will axra.it your reactions and 
suggestions . 

Sincerely, 



Hugh S. Kelly 

Computer Sciences Department 

ESK/mac 

Enclosures: (1) IPL Examples and Problems. 

cc; P. Armor 
A. Newell 
H. Simon 
F. Tonge 
It, Uncapher 



SECTION I 



EXAMPLES 



This section contains data structures and routines 
drawn from heuristic programs coded in IPL-V, as well as 
some simple tutorial examples. The examples are accompanied 
by commentary which explains the format, the context, the 
interpretation, or interesting IPL techniques. The arrangement 
of the examples roughly parallels the introduction of 
important concepts in Part I of the IPL-V Programming 
Manual, with the intent to demonstrate the concept with 
further examples in a real context. The student should find 
this section a useful supplement while studying Part I of 
the Manual. 



Section I. EXAMPLE ROUTINES AND DATA STRUCTURES 



1. Logic expressions are input to the Logic Theorist in 
a convenient external form and then are converted to 
an internal form for convenient manipulation. The 
external form is a string of characters . Examples 
LA and IB are strings that represent logic expressions. 

IA. (AI(A v B)) Read "A implies (A or B)'\ 

IB. ((-P V (Q V R))IS) 



2. LI is a list which represents string 1A by using 
regional symbols to stand for the characters of the 
string. Inserting, deleting, or rearranging characters 
of the string would now correspond to manipulating 
symbols on list LI. 

COMMENTS TYPE NAME PO, SYMB LINK 



Data Header 5 1 
(AI(A v B)) LI 0 



(0 
AO 
10 
(0 
AO 
v0 
BO 
)0 
)0 
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The data header is not part of the list LI but serves 
to indicate to the IPL loader that data will follow, 
rather than routines . Note that the first character 
of the string should be written on the line below the 
line which names the list. The zero in the LINK 
field terminates the list. 



3. Rl is a routine which will print LI as a list. 



COMMENTS 



TYPE NAME SYMB 



Routine Header 5 

Input the symbol 
"LI" to HO. 

Execute Process 
J151. 



Rl 10 
00 



LINK 



LI 
J151 



0 



Again note that the first card, with TYPE - 5, Q 1 
blank, is not part of Rl but indicates to the IPL 
loader that Rl is a routine rather than data. 
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4. To actually print the list LI, we would need to input 
the following deck of cards to an IPL-V computer. 

COMMENTS TYPE NAME P£ SYMB LINK 

Type- 9 card 9 

1 

Type-2 cards define regions. 2 A 1 

The B- Region consists of 2 B 1 

one cell, named "BO" or just "B". 2 1 1 

2 L 2 
The R-region has 2 cells, 2 R 2 

named "RO" and "Rl". 2 v 1 

2 ( 1 

2 ) 1 
Type-1 cards are for comments. 1 

1 

Type-5, Q-l says "DATA FOLLOWS." 5 1 

Ll---(AI(A v B)) LI 0 

A 
I 

( 
A 

v 
B 



0 



Type-5, 0=blank says "ROUTINES 5 
FOLLOW . 1 

1 

Rl prints the list LI. 1 

1 

0=3 says "TRACE THIS ROUTINE." Rl 13 LI 

J151 0 

P or Q 85 0 can be left blank. 

Type-5, SYMB=Rl says execute Rl 5 Rl 

See pages 214-223 of the IPL Manual for a detailed 
discussion of the deck setup for running a program. 
Page 221 is a convenient summary of the requirements. 
The important things to note at this point are that you 
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must 1) define the regional symbols you use by type-2 
cards, and 2) precede your blocks of data with a type-5 
card, Q = 1 and your routines with a type-5, Q ■ 0 or 
blank . 



5. L2 is a list structure which represents string 1A as 
a list of alphanumeric data terms, one data term for 
each character in the string. 

COMMENTS TYPE NAME P£ SYMB LINK 



Data Header 5 01 

(AI(A V B)) in data terms. L2 0 

( 9-1 

A 9-2 

I 9-3 

( 9-4 

A 9-5 

v 9-6 

B 9-7 



) 9-8 

) 9-9 0 

9-1 21 ( 

9-2 21 A 

9-3 21 I 

9-4 21 ( 

9-5 21 A 

9-6 21 v 

9-7 21 B 

9-8 21 ) 

9-9 21 ) 

Note that the characters in the data terms of L2 are 



not regional symbols, and hence you would only have 



5 



to define the L-region in order to load L2. This 
representation of the string 1A takes 2 cells per 
character . 



SECTION II PROBLEMS 

The following problems are based on and refer to the 
data structures and routines in Section I. Solutions to 
all problems are given in Section III. The student is 
urged to attempt hiw own solution and then compare it with 
the solution provided in Section III. 



1. Code a list named Dl which represents the string in 
Example IB as a list of regional symbols. (Use 
Example 2 as a model.) 



2. Code a list structure named D2 which represents the 
string in Example IB as a list of local data terms. 
(Use Example 5 as a model . ) 



3. Code R2--"Print L2 as a List Structure." (Use 
Example 3 as a model.) 



4. Produce all the coding necessary to run R2 of Problem 
3. (Use Example 4 as a model.) 
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5. Code PI --"Reverse the order of the characters in 

string (0)." Assume that the string named in HO is 
like LI, Example 2. 



6. If we assume that HO names a string like L2 in 

Example 5 , will the PI which you coded in problem 
still serve to reverse the order of the characters in 
the string? If not, code P2 to do so. 



7. Code P3 — "Delete all occurrences of character (0) 
from string (1). Set H5 minus if the character did 
not occur in the string, otherwise set H5 plus." P3 
assumes that (0) is a regional symbol and (1) is a 
list like Ll of Example 2. 
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8. Code the routine P4 , having the same definition as P3 
in Problem 0, except that P4 assumes (0) names an 
alphanumeric data term and (1) is like L2 in Example 5. 



9. Code P5 and P6--"Locate character (0) in string (1). 
Set H5 plus and output the location if the character 
is found. Otherwise set H5 minus and output the 
location of the last character in the string." P5 
assumes (0) is a regional symbol and (1) is like LI. 
P6 assumes (0) names an alphanumeric data term and 
(1) is like L2. (In both P5 and P6, the "location" 
that is wanted is the name of one of the cells on the 
main list of LI or L2 , not the name of the regional 
symbol nor of the data term.) 
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10. Code P7--"Delete from string (1) all occurrences 

of the characters in string (0). H5 is not changed 
by P7." P7 assumes string (0) and string (1) are 
like LI except a given character appears only once 
on (0) and may occur several times on string (1) . 



11. Code P8 — P8 has the same definition as P7 but assumes 
strings (0) and (1) have a format like L2. Thus, 
to delete a character in this case means to remove 
the name of the local data term from the main list 
of L2 and then to erase that data term. 



12. Code P9 and P10 — "Create the list of operators that 

are common to string (0) and string (1), disregarding 
order. Set H5 minus and create no list if there are 
no common operators . Otherwise set H5 plus and output 
the list of common operators." P9 assumes the strings 
to be like Ll, while P10 assumes them to be like L2. 
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Both assume that the characters "I," "v," "*," and 
"-" are the only operators. An operator should appear 
on the output list only once, regardless of how often 
it appears in common on the input strings. 
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SECTION III SOLUTIONS TO PROBLEMS 

The solutions presented here are not to be construed 
as the solution, but an attempt has been made to demonstrate 
standard IPL techniques. 



B.A. 21k 
Spring 196l 
F. M. Tonge 

Notes on the Internal Representation of Data 
in the Logic Theorist (IPL-V version) 



Total Expressions . 

Logic expressions are represented as describable list structures, the 
sublists of which are non-describable. On sublists, representing subexpressions, 
the connective of the subexpression is the symbol in the head of the sublist, 
the left subexpression is the first symbol on the sublist, and the right 
subexpression (if any) is the second symbol on the sublist. 

For example, the internal representation of 

(FVQ)l-P 

would be: 

.... 0 

9-1 0 
9-1 I 

9-2 

9-3 0 
9-2 V 
P 

Q 0 

9-3 - 

P 0 

The subexpression corresponding to the entire logic expression (here, 9-l) 
is called the main expression or main segment. All sublist structures are 
called segments. 

Copy for Substitution . 

The match process (M20) takes as inputs total expressions. Often, however, 
we wish to match subexpressions (as, for example, the right sides of two 
expressions.) The subexpressions must then be set up as separate total 
expressions. The match process makes use of substitution (M2l) in the 
expressions to keep track of correspondences made between free variables and 
constants . However, the substitution should be made throughout the entire 
original total expressions from which the expressions for matching were derived. 

We handle this total substitution by using the segment on which we desire 
to match (rather than a copy of that segment) as the main expression of a 
derived total expression, associating with the new expression the original 
total expression from which it was derived. Substitution into the original 
total expression thus is also substitution into the derived expression. 
(We must be careful not to erase the derived total expression as a list 
structure, since its main segment, which may be a local sublist, in fact 
belongs to the original total expression.) 
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Working lists . 

There are four major lists on which logic expressions in various states 
of processing are kept. 

The problem list (LO) is a linear list of the problems to be proven 
during the run. 

The theorem list (Ll) is a linear list of true logic expressions (at 
first just the axioms.) 

The untried subproblems list (LIO) is a list of pairs. The first of 
each pair is an integer data term. The second of each pair is a list of 
those untried subproblems having that integer as their "number of levels . " 
The data terms are arranged in ascending order. Thus, the "simplest" 
untried subproblem can be found on the first sublist. 

The tried subproblems list (Lll) is also a list of pairs, the first 
of each pair being an integer data term, "number of levels." However, the 
associated list is also a list of pairs, the first member of each pair 
being an integer data term, "number of distinct variables." The associated 
lists are again lists of pairs, the first of each pair being an integer 
data term, "number of variable places." The associated list is a list of 
all tried subproblems (expressions) having the indicated "number of levels," 
"number of distinct variables," and "number of variable places." Thus, to 
determine if a given subproblem has already been tried, it is only necessary 
to compare it with tried subproblems having the same description. 



B. A. 21k 
Spring, 1961 
P. M. Tonge 



Major Errata for IPL-V Manual, 
Section I (RAND P-1897) 
(May 16, I960 version) 



pg. 26, line 1: '9-1*: the name of the next cell on the list. 

pg. 29, line 7: 9-1 30 WO Pop up WO 

pg. h2i all regions should be of size 2 

pg. 52, line 11: 3§ HO 9-2 Pop it up, ... 

pg. 52: an end of routine R3, add: 

12 HO 

9-10 
70 9-11 J8 

Pg* 73 > line hi 9-10 works in the same context as J77; ••• 

pg. 82, line -U: the cells of each sublist will be generated immediately 

after 

pg. 83: code for RIO is wrong 

pg. 95, line 15: Pig. 12* 

pg. 125, line 17: H *1 



IDENTIFICATION 



RS IPLV — IPL-V Interpretive System 
C. L. Baker, H. S. Kelly 

The RAND Corporation, Santa Monica, California 
November 25, i960 

PURPOSE 

To interpret and execute programs written in the IPL-V 
language, as described in AN INTRODUCTION TO INFORMATION 
PROCESSINO LANOUAOE V, and INFORMATION PROCESSING LANGUAGE V 
MANUAL, Sections I and II, The RAND Corporation papers P- 1929, 
P-1897, and P-1918, I960. 

RESTRICTIONS 

The program is in the form of a closed subroutine, 
designed for compatability with the MockDonald Operating 
System for the 709/7090. The calling sequence is in the same 
format as in the BCS routine within MD. The individual 
installation using this system may incorporate IPL as a file 
on the MD SYSTAP (as has been done at RAND), or execute the 
IPL program in phase I of the system, or integrate with any 
other system with a minimum of effort. The program may be 
run on any 709/7090 of at least 8K storage capacity and having 
at least three tape units. No on-line card reading or 
printing capability is provided. 

METHOD 

The IPL system is read into core, at which time it saves 
the rest of core (which would contain the operating system in 
use) on tape, then reads the IPL-V program into core and 
assembles it. Control is then passed to the IPL-V inter- 
preter. Error detection and tracing capability is provided, 
and a Post-Mortem in IPL-V format is printed at the conclusion 
of execution. Core is then restored from tape, and control 
returned to the calling routine. Execution speed is approxi- 
mately 210,000 IPL-V instructions per minute. 

USE 

See the papers mentioned above for a basic description of 
the system and language; deviations from this description are 
described in the attached write-up. Details of the calling 
sequence for the routine, etc., are also Included. 

NOTES 

While this distribution is to be considered a field-test 
trial of the system, it is in use at The RAND Corporation for 
a number of complex problems, including the proof of logic 
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theorems using the General Problem Solver coded in IPL-V. 
This program contains more than 6,000 IPL-V instructions and 
takes more than 500*000 interpretation cycles for a complete 
run. Numerous other large problems have also been interpreted 
and executed. The inclusion of IPL-V in the MockDonald System 
at RAND permits IPL-V Jobs to be stacked with other Jobs and 
executed with all of core available to the IPL-V programmer. 

Any questions regarding the operation or correctness of the 
IPL-V system should be directed to: 

C. L. Baker 

The RAND Corporation 

1700 Main Street 

Santa Monica, California. 

Questions concerning the incorporation of the IPL-V system 
into the MockDonald Monitor should be directed to: 

0. E. Bryan 

The RAND Corporation 

1700 Main Street 

Santa Monica, California. 
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LINE READ PRIMITIVES 
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The line read primitives are assembled into 25500 1Q . They may 

be loaded preceded by a Type 5, P=3, card. No space need be 
reserved with a Type 3, 0,-2 P card. The packet of line read 
binaries should immediately follow the Type' 2 and 3 cards on 
loading. Until they are in memory, references to W30 will not 
be accepted by the loader (and the initial random number control 
will be violated). 

Line read is controlled by the following symbols: 

1W24 names the current line. (The symbol in cell 1W2^ is 
the address of the first of a block of consecutive cells 
forming tha line, one column per cell. The first column 
is stored in the cell after 2W24, that first cell being 
used to hold the spacing control in line printing. The 
link in cell 1W24 is the number of columns In the line, 
and thus one less than the number of consecutive cells in 
the block. Until the Type 3, Q~l, facility for automat- 
ically setting up print (and read) lines is provided, the 
programmer must set these control words up himself, using 
consecutive space from the regions or primitive block. ) 
1W25 is an Integer data term giving the left column of the 

current Input field. 
1W30 is an Integer data term giving the size (number of 
columns) of the current input field. 

The line read primitives are: 

*Jl80 READ LINE. The next record on the input tape is read 
into line 1W24. (The record is assumed to be BCD, ) 
Column 1 of the record is read into column 1 of the 
input line, and so forth. H5 is set +. If no record 
can be read (end of file condition), the line Is not 
changed and H5 is set ~. 

*Jl8l INPUT LINE SYMBOL. The IPL symbol in the field 

starting in column 1W25 and of size 1W30, In line 
1W24, is input to HO and H5 is set +. The symbol is 
regional if the first column is a regional character; 
otherwise It is absolute Internal. In inputting the 
symbol all non -numerical characters except In the 
first column are ignored. If the field is entirely 
blank, nothing is input to HO and H5 is set -. In 
either case, 1W25 Is Incremented by the amount 1W30. 



*J182 INPUT LINE DATA TERM (0). The field as specified in 
Jl8l is taken as the value of a data term, and input 
data term (0) is set to that value and left as out- 
put (0). H5 is set +. (At present only integer and 
BCD data terms are recognized; any input (0) not 
integer is taken as BCD. In composing BCD data terms, 
characters are entered from the left and the full data 
term completed with blanks on the right if necessary*, 
In composing integer data terms, non -numerical 
characters are treated as blanks and ignored.) If the 
field is all blanks, (0) is cleared (to blanks for 
BCD, to zero for integer) and H5 is set -. 1W25 is 
incremented by the amount 1W30. 

*J183 SET (0) TO NEXT BLANK. (0) is taken as the name of 
an integer data term. Line l\l2k is scanned, left to 
right, starting with column 1W25+1. A "1" is added 
to (0) for each column scanned, including that in 
which the scanned-for character (blank for Jl83) is 
found. (0) is left as output (0). H5 is set + if the 
character is found, and - if it is not. 

(Thus, if (0)»1W25, after scanning it will indicate 
the column holding the scanned-for character. If (0)«0, 
after scanning it will be the size of a field delimited 
on the right by the next occurrence of the scanned-for 
character. ) 

*J184 SET (0) TO NEXT NON -BLANK. Same as Jl83, except scans 
for any non-blank character. 

*J185 SET (1) TO NEXT OCCURRENCE OP CHARACTER (0). Same as 
J183, except scans for character (0), tallying into 
input (1). Input (l) is left as output (0). If in- 
put (0) is regional, its region is the character 
scanned for; if internal, its last digit is the 
character scanned for. 

*Jl86 INPUT LINE CHARACTER. The character in column 1W25 of 
line llflT24 is input to HO and H5 is set +. If the 
character is a blank, there is no input and H5 is 
set -. In either case, 1W25 is not advanced. 

*J189 TRANSFER FIELD. The field in line 1W24, starting in 
column 1W25 and of size 1W30 is transferred to line 
(0), starting in column 1W21, and H5 is set +. If 
the entire field cannot be transferred (line (0) too 
short), as much is transferred as can be, and H5 is 
set -. In either case, 1W25 is set to the last 
column transferred + 1. 
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Program Description 

This write-up is in two parts; the first describing the nature 
of the IPL-V system as a subroutine, the second including 
deviations from and additions to the basic IPL-V manual. 



PART I 

Calling Sequence ; 



cs 




1 - 


LDI 


CNTRL 








TSX 


AO, 4 


CS 




1 - 


• • • 


cs 


+ 


2 - 


PZE 


SYSPIT, # SYSMIT 


cs 




3 - 


PZE 


SYSPOT,,,... 


cs 




4 - 


PZE 


SYSES1,,SYSES2 


cs 




5 - 


• ■ * 




cs 


t 


6 « 


PZE 

• 

• 


* * 1 1 > SYS ERR 


cs 




13- 


• 

PZE 

• 

• 


SYSORQ, , . . . 


cs 


+ 


29- 


• 
• 

Return 

• 
• 


cs 




37- 


• 

PZE 


SYSTSLj , • • • 



The above calling sequence is that used within the MockDonald 
Operating System; hence its strange format. Words or parts of 
words indicated by are not significant. 

Control bits ; 

Bits 31-35 of CNTRL are placed in the Sense Indicator Register 
for conveying information to IPL-V as to the nature of the run 
being made. Immediately below is given the meaning of these 
bits; their interpretation is explained in Part 2. 

Bit 35 0 LOAD 
" " 1 RELOAD 

Bit 34 0 NOTAPE 
" * 1 TAPE 
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Bit 33 0 LIST 
" * 1 NOLIST 

Bit 32 0 NTRACE 
" 1 TRACE 

Bit 31 0 NODUMP 
" * 1 DUMP 

The program which includes the calling sequence may interpret a 
control card similar to that used to call SCAT, LOAD, etc., and 
set the bits accordingly. 



Calling Sequence Information : 

SYSPIT, SYSMIT, SYSMOT, SYSES1, SYSES2 are the locations of tape 
control words. These words must contain the address of the 
physical unit associated with the symbolic tape. (E.g., if 
SYSPIT is on physical unit B2, the control word would have an 
octal address of 02202.) Only the first three tapes are neces- 
sary for using the system. If the address is zero, the unit is 
interpreted as being unavailable. 

SYSTSL is the location of the Tape Status list for reserved tapes. 
It is arranged such that 

AXT CHANNEL, 2 (1 for Ch. A, 2 for Ch. B, etc.) 
AXT UNIT,1 (3 for unit 3, etc.) 

CLA« SYSTSL, 2 

will put the address of the corresponding tape control word into 
the decrement of the accumulator. Tapes SYSAR1,2,3, SYSBR1,2, 
and 3 are interrogated. Again, a zero address is interpreted as 
meaning that the corresponding unit is unavailable. 

SYSERR is the location to which the operator is to transfer in 
case of program error, loop, too much time, etc. Both SYSERR 
and SYSERR- 2 are replaced with a transfer to the recovery 
routine for IPL-V; the contents of these cells is saved and 
restored. They must lie in the range 00001--00077g. 

SYSORG is the name of a cell containing the location of the first 
word following the system in control. Meaory up to location 
C(SYSORO) is left undisturbed |y the execution of IPL-V (with 
the exception of eell zero.) 

Operation of the IPL-V executive routine, AO ; 

1) All traps are disabled. 

2) The tape control words are interpreted and a table of tape 
information is constructed. 

3) Memory is saved on tape SYSMIT from locations lOOg-C(SYSORO) . 
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If the RELOAD option is called, Memory is reloaded from 
S YSAR2 , 

The remaining Sense indicator bits are interpreted. 
Control is passed to the IPL-V system interpreter. 
At the conclusion of the IPL-V run (Program finished, error, 
or manual transfer to SYSTEM or SYSERR), Memory is restored 
from tape SYSMIT, and control returned to word 29 of the 
calling sequence. 

Notes : 

Although the system has been organized so as to work within the 
MockDonald Monitor System, it should be emphasized that it is in 
no way dependent upon any of the routines of that system. Only 
the tape control words of that system need be reproduced (in the 
format explained above) to gain complete independence of that 
system. 

All input and output routines are contained within the IPL-V 
system Itself. Data is read, in BCD, from tape SYSPIT; output 
is written in BCD on tape SYSPOT. Neither tape is rewound, nor 
is an end of file ever written on SYSPOT. Tape SYSMIT is used 
for saving core only; if it is not desired to retain this 
feature, routines A2 and A3 may be replaced by TRA 1,4. SYSAR1, 
2 and 3 may be used by the IPL-V interpreted program; see 
following section for details. SYSBS1,2, SYSBR1,2, and 3 are 
never used, and have been included in the tape set-up routine 
only in anticipation of possible future expansion of the IPL-V 
system. 

Example t 

Following is a complete calling sequence requiring no informa- 
tion from the MockDonald System: 

START LDI 
TSX 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
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V 



CNTRL 
AO, k 

SYSPIT, , SYSMIT 
SYSPOT 

SYSES1,,SYSES2 



0,0,3 Manual error transfer to 3g or lg. 



SYSORQ 
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CMTRL 

SY3PIT 

SYSMIT 

SYSPOT 

SYSES1 

SYSES2 

SYSAR1 

SYSAR2 

SYSAR3 

SYSBR1 

SYSBR2 

SYSBR3 

SYSORQ 



SYSTSL 



CHNLA 



CHNLB 



PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
TRA 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
OCT 
OCT 
OCT 
OCT 
PZE 
PZE 
OCT 
OCT 
OCT 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 
PZE 



out 



SYSTSL 
23 

2201 
2202 
2203 



1201 
1202 
1203 



16384 
CHNLB, 1 
CHNLA, 1 



RELOAD, TAPE, LIST, NTRACE, DUMP 

Unit Bl for SYSPIT 

Unit B2 for SYSMIT 

Unit B3 for SYSPOT 

SYSES1 not used. 

SYSES2 not used. 

Unit Al for SYSAR1 

Unit A2 for SYSAR2 

Unit A3 for SYSAR3 

SYSBR1 not used. 

SYSBR2 not used. 

SYSBR3 not used. 

Save lower half of core. 



(Example) 



Tape Status List. 
0,,SYSAR3 
0,,SYSAR2 
0,,SYSAR1 

0,,SYSBR3 
0,,SYSBR2 
0,,SYSBR1 
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PART II 

This write-up Includes only deviations from and additions to 
the basic IPL-V manual, INFORMATION PROCESSING LANGUAGE V 
MANUAL, Section II, Programmers' Reference Manual, A. Newell, 
et al, The RAND Corporation paper P-1918, March 31> I960. 
Familiarity with this manual is assumed, and references are to 
sections and page numbers in this manual. 

INITIAL LOADING, Page 72 

This version is not set up to run multiple IPL-V Jobs. Each 
run must begin with the execution of the calling sequence for 
IPL-V. References to bits 31-35 refer to the setting of the 
Sense Indicator register on entry to IPL-V. (See Part 1.) The 
IPL-V program, set up as described on page 79* is assumed to be 
on tape SYSPIT, in BCD. This tape is not rewound prior to 
reading. 

All output is off-line, on tape SYSPCT. This tape is never 
rewound, nor is an end-of-file written. This permits stacking 
of the IPL-V output with other jobs adhering to the same 
output conventions . 

A TYPE 9 CARD (page 78) is treated as a type 1 comment card, as 
no multiple Job provisions are included. 

TYPE 2 CARDS do not have the full flexibility described on 
page's 73-74. Only the NAME and LINK fields are read; the first 
character of the NAME field must be the region symbol; the LINK 
field must contain the extent of the region. The first example 
in page 74 is the only acceptable format for type 2 cards. 

A TYPE 3 CARD , if it appears, must precede any type 2 cards. 
It may be used to reserve a block of storage for binary IPL-V 
routines written by the programmer. The block will start at 
location IOOq, and the extent of the block will be as given in 
LINK. No otner uses for type 3 cards are permitted. A block 
of storage has already been reserved for line printing; other 
print lines may be reserved by other means (see below under 
line printing) . 

TYPE 5 CARDS do not have the full flexibility as specified on 
pages 77-78. P must be zero or blank for standard IPL format, 
or 3 for absolute column binary format. Q is interpreted as 
described; however, there is a maximum of 150 local symbols and 
a maximum of 100 internal symbolics that may be used per 
routine or data list structure. 



SYMB does not control the input unit, and is disregarded unless 
regional. 
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LINK character d is ignored; the only output from the assembly 
process is the listing on SYSPOT, as controlled by character c. 

TYPE 6 AND 7 CARDS are treated as type 5 headers as no auxiliary 
storage capability is Included. 

NOTE- TYPE 1 CARDS should not appear in the middle of a program 
or data list following a program or data card with a blank 
SYMB or LINK. This will lead to an error which is not detected 
at assembly time. (The blank LINK or SYMB is treated as 0.) 

ABSOLUTE BINARY INPUT . A type 5 card with P - 3 indicates that 
a block of absolute, column binary, cards follows. These must 
load into the space reserved by the single type 3 card at the 
beginning of the program. The last binary card must be a 
?r!n 8 ?er g card; the address is ignored, however After the binary 
cards have been read, the symbols HO, JO, and WO are stored in 
the address parts of location lOOo, 10 1 8 , and 102a, respectively. 
This permits the programmer to re?er to°these regions conveniently 
when coding machine language programs. 

ALTERNATIVE INPUT UNIT. Provision has been included for reading 
input from tape S^Akl in BCD format if desired. Sense indicator 
bit 34 controls this function. If bit 3* is TAPE when the pro- 
gram is first loaded, the IPL-V loader will initially read from 
tlpe SYSAR1 in BCD. 'The order and format of cards on this tape 
must be identical to that used for on-line reading of cards 
When an end-of-file is encountered on this tape, the IPL-v loaaer 
SS Stempt to'read from tape f SPIT Printing of the assembly 
of tape SYSAR1 may be suppressed by setting bit 33 to NOLIST, in 
this case only the header cards from SYSAR1 will print. If 
bit 33 is LIST, printing control is from character c of the 
header cards on the tape. 

EXAMPLE. A short IPL-V program is to be loaded and exited. 
fht dec k should be set up exactly as described, and written on 
m?TT in BCD. Bit 3* should be NOTAPE Execution of the IPL-V 
calling sequence will cause the program to be loaded and 
executed as described. 

EXAMPLE . A long IPL-V program is to be J^ded and executed. 
A BCD ta pe should be prepared off-line; the deck set-up should 
be exactly as described, except that the final type five card 
rtortd not be written on the tape. The data is followed by an 
end-of-file on this tape. To load and execute, this tape is 
mSun?ed on unU SYSAR1. The final type five card is loaded on 
SYSPIT? with bit 34 - TAPE, bit 35 - LOAD. Loading and execu- 
tion will take place as described. 

For subsequent runs, with routines to be changed or new data 
added the same tape SYSAR1 may be mounted, and the corrected 
routines andSata Laded on SYSPIT before the final type five 
card. Since the changed routines or data are read from SYS PIT 
after tape SYSAR1 has been read, the corrections will be made 
before interpretation begins. 
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INPROCESS LOADING, Page 80 

The restrictions that apply to initial loading: also apply to 
inprocess loading. Note that type 2 and type 3 cards may not be 
loaded. Regional symbols which were initially assigned by 
type 2 cards are still available, as unused regionals are NOT 
returned to available space. (This compensates somewhat for 
the lack of type 3 symbol reservation.) 

SAVE FOR RESTART, Page 8l 

J166 should read SAVE ON TAPE SYSAR3 POR RESTART. All of 
memory is written onto tape, and the program continues from that 
point. The tape is rewound after writing, so that multiple 
occurrences of J166 will cause the tape to be rewritten. Bit 31 
should be DUMP if Jl66 is to be used. 

JI67 is not available, as no auxiliary storage is provided. 

RELOADING . Reloading is from the tape written by J166. The 
tape should be mounted on tape SYSAR2; bit 35 - RELOAD is used 
to initiate the reload process. After reloading, control is 
returned to exactly the same place in the execution of Jl66 as 
when memory was saved. 

EXAMPLE . A program is to be loaded, saved immediately for sub- 
sequent restart, and the program is then to be executed. On 
reloading, it is desired to make changes or corrections before 
execution. 

Include a one-word routine in the program as follows: 

NAME SYMB LINK 
RO J166 JI65 

Place two type 5 termination cards at the end of the deck; the 
first with a SYMB of RO, the second naming the start of the 
program; bit 35 - LOAD, bit 31 - DUMP. Operation is then as 
follows: The program is read in and assembled, and interpreta- 
tion begins with Instruction RO. J166 will save memory on 
SYSAR3, and the program will continue with the interpretation 
of the instruction, which links to JI65. JI65 will read more 
routines and data, Including termination cards. Since the only 
card remaining is a termination card, interpretation will begin 
with the first instruction of the program. 

To reload, place the corrected routines or data lists on SYSPIT, 
each preceded by the proper type 5 header card, and followed 
with the same two termination cards. The tape written on the 
first pass is mounted on tape SYSAR2. Bit 35 « RELOAD, bit 34 * 
NOTAPE, bit 31 * DUMP. Immediately after reload, interpretation 
will continue at RO; and JI65 will read the corrections into 
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memory. The first termination card will repeat the save process 
on SYSAR3; the second will initiate the interpretation of the 
corrected program. 

NOTE ; The same procedure may be used when the initial program 
Toad" is from SY3AR1 in BCD. Bit 34 should be NOTAPE on reload, 
however, so that JI65 will be prepared to read corrections from 
SYSPIT rather than SYSAR1. 

TAPE UNIT SUMMARY 

BCD Input tape (never rewound) . 

BCD Output tape (never rewound; no end-of-f lies) . 
Alternate BCD Input tape (under control of bit 3*0. 
Reload tape (under control of bit 35). 

Save for Restart tape (under control of bit 31 and J166). 



OPERATION OF THE INTERPRETER 

Interpretation begins within the system by interpreting the 
instruction 

0 0 Xxx J7, 

where Xxx is the routine named on the final type 5 termination 
card. Interpretation will continue until the J7 is linked to, 
at which time the program will print PROGRAM RAN TO COMPLETION 
on the output tape. Other terminations will occur if the pro- 
grammer executes the routine J7, or if the interpreter or a 
primitive process detects any one of a number of errors. In 
case of such a termination, the reason will be printed on the 
output tape, followed by an IPL-V POST MORTEM. The post mortem 
consists of a print-out of the lists named on the list named by 
system cell W23. Initially this list names all the System cells, 
HO through W29. The programmer may replace this list with 
another list, or add symbols to this list. Control is returned 
to 29, k of the IPL-V calling sequence after execution. 

ERROR TRAP, J170, Page 82 

The error trap function is not provided; see above for error 
action. 

SYSTEM CELLS, Page 35 
Exceptions and additions are as follows: 
HO initially contains the symbol 0. 



TAPE SYSPIT. 
TAPE SYSPOT. 
TAPE SYSAR1. 
TAPE SYSAR2. 
TAPE SYSAR3. 
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H2 will Initially be about 26,000 cells for a 32K machine. 

H3 is set to 1 by the Initial loader. 

H4 not used as no auxiliary storage is provided. 

H5 is initially set to J4(+) . 

H6 is used by machine language recursive routines to hold 
index 4. 

H7 is a data term which is set to the current level. It is 
set to 0 by the initial loader, and by Jl65 if cards 
are read. 

H8 is the hide-out cell used by the generator processes. 
H9, H10, and Hll are generator working cells. 
W0....W9 initially contain the symbol 0. 

W10 Initially names a data term for random number generation. 

W12 W15 initially contain JO. 

W16....W20 are not used. See above. 

W21 Initially names a data term equal to 1. 

W22 initially names a data term equal to 1. 

W23 initially names a list of the system cells. 

W24 initially names a 120 word internal buffer for line printing. 

W25 initially names a data term equal to 1. 

W26...W28 are not used. See above. 

GENERATOR PROCESSES, Pages 40-43 

The generator trace context and level context are not restored. 
Subprocesses may be marked to trace by use of J147..J149. 

J102, Page 52 

Not available. May be coded as described in part I of the 
manual, page 82, if desired. 
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AUXILIARY STORAGE PROCESSES, Page 52 
Not available. J72 and J74 assume list structure Is in memory. 

ARITHMETIC PROCESSES, Pages 55-57 
J110-J113 admit fixed and/or floating data terms only. 
J115-J117 admit fixed and/or floating data terms only. 
J125 admits fixed and/or floating data terms only. 
J128 admits fixed and/or floating data terms only. 

INPUT-OUTPUT CONVENTIONS, Pages 61-64 

Input and output units are assigned as described above. Pro- 
cesses J140-J146 are not available. 



MONITOR POINTS AND TRACINO, Pages 64-67 

No console signals are provided. Terminate for restart is not 
available. The program may be terminated by a manual TRA SYSERR 
or SYSTEM. Sense bit 32 - TRACE signals full trace. Trace 
speed is approximately 80 IPL-V instr/sec. Bit 32 - NTRACE gives 
normal tracing modes. 

No provision is made for suppressing tracing. 

On the printed trace line, if S or (0) is a local symbol, this 
is indicated by an asterisk following the symbol; e.g., 2765*. 
The designated symbol S is printed only if Q - 1 or 2. 

PRINT PROCESSES, Pages 69-72 

The output unit is always SYSPOT. When local symbols are 
printed (except in the case of those translated by J150) they 
are followed by an asterisk. 

If a list structure with a local name is printed by J150, the 
converted name will be 9-0. Sublists of any list structure are 
always numbered consecutively starting with 9-1. 

Data terms are always printed in the format given on page 71, 
with the exception of floating point numbers. The format for 
these is -.123456-12"; plus signs are not printed. The field 
length Is thus either 10 or 11 columns. 

Cell W24 initially names an internal print buffer of 120 cells 
(one character per cell) length. Other print lines may be 
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assigned only by defining, via a type 2 card, a block of 120 
consecutive regional cells. (K.O., 2 PO 120) 
PO would then be a legitimate name for a print buffer line; 
the symbols PI P119 would be unavailable for other use. 



J158 and J159 leave 1W25 pointing to the first column to the 
left of the entered information. 



20 October I960 



L-20983 



Mr. Henry A. MeCabe 

Electronic Data Processing Department 

Onion Carbide Corporation 

270 Park Avenue - 37th Floor 

New York 17, Hew York 

Dear Mr. McCabe : 

An initial, field -teat version of the IPL-V (Information 
Processing Language V) interpretive system for the 704 has 
been submitted to 3DA for distribution to all interested 
SHARE members. While this is not a complete version of 
the system as specified in the Programmers* Reference 
Manual, it will suffice to run all but the largest IPL-V 
programs using a 32K machine, and may be used for small 
IPL-V programs en an SK machine. It is more than adequate 
to indoctrinate the uninitiated in the use of this 
language, 

lis are also using, at RAND, a 7090 version operating 
within the MockDonald Monitor System (our version). 
Interested persons should first obtain the descriptive 
material from 3DA, as this is essentially machine Indepen- 
dent, and then contact me at RAND regarding the avail- 
ability of the 7090 version. 

Sincerely yours, 



CLBiahe 



C. L. Baker 



19 October I960 



L-20788 



Mr. Donald C. CtihMn 
Applied Programming Department 
International Business Machines Corporation 
590 million Avenue 
Nov York 22, Bern York 

DMT DOOI 

we are sending, under nniKi cover, tit* following notarial 
for distribution to SHARI member s t 

1. AN MTRODTJCTIO* TO XMfOJOIATXOIf PROCISSDW LABCTOAOI V 
(26 pages) 

2. IHFGRKATIQM PROCBSSIB0 LAWHJAOE V MAH0AL, Sootlon I, 
(13$ pages) 

3. pSFOiWATIOM PROCBSSIH0 LAB0UA0I V MANUAL, Sootlon II, 
(98 P**»c) 

A. RS IPL5 Short Write-up (2 pages) 

5. RS m.5 Program Description (7 pages) 

6. RS IPL5 Binary Dock (250 cards) 

7. RS XFL5 Program Listing (lit pages) 

8. RS IPL5 Remark Card Listing (28 pages) 

9. SHARE Program Submittal Form (1 pago) 

10. RS XPL5 Index Cards (3 cards) 

11. RS IPL5 Abstract Cards (* cards) 

This material constitutes the initial distribution of the 704 
IPL5 interpretive system, and should be treated as a field-test 
version of the program. 

Sincerely yours, 



CLBishe 



C. L. Baker (RS) 



IDENTIFICATION 



RS IPL5 — IPL-V Interpretive System 
C. L. Baker, H. S. Kelly 

The RAND Corporation, Santa Monica, California 
October 15, I960 

PURPOSE 

To interpret and execute programs written in the IPL-V 
language, as described in AN INTRODUCTION TO INFORMATION 
PROCESSINO LANOUAOE V, and INFORMATION PROCESSINO LANGUAGE 
V MANUAL, Sections I and II, The RAND Corporation papers 
P-1929, P-1897, and P-1918, I960. 

RESTRICTIONS 

The program is in self-loading form, and may be run on 
any 704 of at least 8K storage capacity and having at 
least one tape unit. No on-line printing capability is 
provided. Other deviations of the program from the 
manuals are as described below. 

METHOD 

The IPL-V program is read into core and assembled, and 
control passed to the IPL-V interpreter. Error detection 
and tracing capability is provided, and a Post -Mortem in 
IPL-V format is printed at the conclusion of the 
execution phase. Execution speed is approximately 
30,000 IPL-V instr/min. 

USE 

See the papers mentioned above for a basic description 
of the system and language; deviations from this 
description are described in the attached write-up. 

NOTES 

While this distribution is to be considered a field-test 
trial of the system, it has been used at The RAND 
Corporation for a number of complex problems, including 
the proof of loglo theorems using the General Problem 
Solver coded in IPL-V. This program contains more than 
6,000 IPL-V instructions, and takes more than 500,000 
interpretation cycles for a complete run. Numerous other 
problems have also been interpreted and executed. The 
system has also been run on the 7090 using the compati- 
bility package. A 7090 system, running within the 
MockDonald monitor, is currently being tested at RAND. 
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Any questions regarding the operation or correctness of the 
system should be directed to: 

C. L. Baker 

The RAND Corporation 

1700 Main Street 

Santa Monica, California. 



704 IPL-V 



Program Description 



This write-up includes only deviations from and additions to 
the basic IPL-V manual, INFORMATION PROCESSING LANGUAGE V 
MANUAL, Section II, Programmers' Reference Manual, A. Newell, 
et al. The RAND Corporation paper P-1918, March 31, I960. 
Familiarity with this manual is assumed, and references are 
to sections and page numbers in this manual. 



INITIAL LOADING, Page 72 

This version is not set up to run multiple IPL-V Jobs. Each 
run must begin with the loading, on line, of the IPL-V system 
in binary form, followed by the IPL-V program, set up as 
described on page 79. 

Since all output is off-line, on tape 10, this unit must be in 
ready status. This tape is never rewound, nor is an end -of - 
file written. This permits stacking of the IPL-V output with 
other Jobs adhering to the same output conventions. 

A TYPE 9 CARD (page 78) is treated as a type 1 comment card, 
as no multiple Job provisions are included. 

TYPE 2 CARDS do not have the full flexibility described on 
pages 73-74." Only the NAME and LINK fields are read; the first 
character of the NAME field must be the region symbol j the 
LINK field must contain the extent of the region. The first 
example in page 74 is the only acceptable format for type 2 
cards. 

TYPE 3 CARDS are not recognized. A block of storage has 
already been reserved for line printing; other print lines may 
be reserved by other means (see below under line printing). 
If a type 3 card is present, it will be treated as a type 2 
card. 

TYPE 5 CARDS do not have the full flexibility as specified on 
pages 77-78. P is disregarded) all input is assumed to be in 
IPL standard format. Q is Interpreted as described! however, 
there is a maximum of 150 local symbols and a maximum of 100 
internal symbolics that may be used per routine or data list 
structure . 

SYMB does not control the input unit, and is disregarded unless 
regional • 

LINK character d is ignored) the only output from the assembly 
process is the listing on tape 10, as controlled by character c. 
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TYPE 6 AND 7 CARDS are treated as type 5 headers as no auxiliary 
storage capability is included. 

NOTEt TYPE 1 CARDS should not appear in the middle of a program 
or data list following a program or data card with a blank 
SYMB or LINK. This will lead to an error which is not detected 
at assembly time. (The blank LINK or SYMB is treated as 0.) 

ALTERNATIVE INPUT UNIT . Provision has been included for reading 
input from tape 9 in BCD format if desired. Sense switch 6 
controls this function. If switch 6 is ON when the program is 
first loaded, the IPL-V loader will initially read from tape 9 
in BCD. The order and format of cards on this tape must be 
identical to that used for on-line reading of cards. When an 
end -of -file is enoountered on this tape, the IPL-V loader will 
attempt to read from the on-line reader. 

NOTEt If an end-of-file is not sensed before loading from 
tape 9 has been terminated by a type 5 card with a regional 
symbol, the input unit from which Jl65 (Load more routines and 
data) will attempt to read will be tape 9* Also, if memory is 
saved for restart, the reloading procedure will ignore the 
setting of switch 6, and the unit from which J165 will read 
will be that which was current when the memory was saved. (See 
Save for Restart and Reloading.) 

EXAMPLE . A short IPL-V program is to be loaded and executed. 
The deck should be set up exactly as described, and placed 
behind the IPL-V binary deck in the on-line reader. Switch 6 
should be up. Clear, load cards. Loading and execution will 
take place as described. 

EXAMPLE . A long IPL-V program is to be loaded and executed. 
A BCD tape should be prepared off-line; the deck set-up should 
be exactly as described, except that the final type five card 
should not be written on the tape. The data is followed by an 
end-of-file on this tape. To load and execute, this tape is 
mounted on unit 9. The IPL-V binary deck is loaded on-line, 
followed by the final type five card, with switch 6 ON. 
Loading and execution will take place as described. 

For subsequent runs, with routines to be changed or new data 
added, the same tape may be mounted, and the corrected routines 
and data loaded behind the IPL-V binary deck before the final 
type five card. Since the changed routines or data are read 
on-line after the tape has been read, the corrections will be 
made before interpretation begins. 



INPROCESS LOADINO, Page 80 

The restrictions that apply to initial loading also apply to 
inprocess loading. Note that type 2 and type 3 cards may not 
be loaded. Regional symbols which were initially assigned by 
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type 2 cards are still available, as unused regionals are NOT 
returned to available space. (This compensates somewhat for 
the lack of type 3 symbol reservation . ) 



SAVE FOR RESTART, Page 81 

J166 should read SAVE ON TAPE UNIT 2 FOR RESTART. All of 
memory is written onto tape 2 in self-loading form, and the 
machine stops. Pushing START will continue with the program 
from that point. The tape is rewound after writing, so that 
multiple occurrences of J166 will cause the tape to be re- 
written . 

J167 is not available, as no auxiliary storage is provided. 

RELOADING. Reloading is from the tape written by 3166. The 
tape should be mounted on tape unit 1; LOAD TAPE is used to 
initiate the reload process. After reloading, control is 
returned to exactly the same place in the execution of J166 as 
when memory was saved, except that no halt occurs after the 
reload . 

EXAMPLE . A program is to be loaded, saved immediately for aub- 
sequent restart, and the program is then to be executed. On 
reloading, it is desired to make changes or corrections before 
execution . 

Include a one -word routine in the program as follows: 

NAME SYKB LINK 
RO J166 J165 

Place two type 5 termination cards at the end of the deck; the 
first wTOi a SYMB of RO, the second naming the start of the 
program. Operation is then as follows] The program is read 
in and assembled, and interpretation begins with instruction 
RO. J166 will save memory on tape 2, and the program will 
stop. Pressing START will continue with the interpretation 
of the instruction, which links to J165. JI65 will read more 
routines and data. Including termination cards. Since the only 
card in the reader is a termination card, interpretation will 
begin with the first instruction of the program. 

To reload, place the corrected routines or data lists in the 
card reader, each preceded by the proper type 5 header card, 
and followed with the sane two termination cards. The tape 
written on the first pass is mounted on tape unit 1, and LOAD 
TAPE starts the reload process. Immediately after reload, 
interpretation will continue at ROj and JI65 will read the 
corrections into memory. The first termination card will repeat 
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the save process on tape 2j the second will Initiate the Inter- 
pretation of the corrected program. 

NOTEs The same procedure may be used when the Initial program 
load Is from tape 9 In BCD. The termination cards should not 
be on the tape, however, so that J165 will be prepared to read 
corrections from the on-line reader rather than tape 9. (See 
note above under Alternative Input unit.) 

TAPE UNIT SUMMARY 
TAPE 1. Reload tape (self-loading). 
TAPE 2. Save for Restart tape. 

TAPE 9. BCD Input tape (under control of Switch 6). 
TAPE 10. BCD Output tape (never rewound] no end -of -files) . 



OPERATION OP THE INTERPRETER 

Interpretation begins within the system by interpreting the 
instruction 

0 0 Xxx J7, 

where Xxx is the routine named on the final type 5 termination 
card. Interpretation will continue until the J7 is linked to, 
at which time the program will print PROGRAM RAN TO COMPLETION 
on the output tape. Other stops will occur if the programmer 
executes the routine J7, or if the interpreter or a primitive 
process detects any one of a number of errors. In case of such 
a stop, the reason will be printed on the output tape, followed 
by an IPL-V POST MORTEM. The post mortem consists of a print 
out of the lists named on the list named by system cell W23- 
Initially this list names all the system cells, HO through W29. 
The programmer may replace this list with another list, or add 
symbols to this list. The normal stop following a post mortem 
is 00000. Other stops may occur due to machine malfunction or 
for other undetectable IPL-V programming errors. Consult the 
program listing in case of such a stop. 



ERROR TRAP, J170, Page 82 

The error trap function is not provided; see above for error 
aotlon. 



5. 



SYSTEM CELLS, Page 35 
Exceptions and additions are as follows: 
HO Initially contains the symbol 0. 

H2 will Initially be about 26,000 cells for a 32K machine. 

H3 Is set to 1 by the initial loader. 

H4 not used as no auxiliary storage Is provided. 

H5 is initially set to J4 (+). 

H6 is used by machine language recursive routines, to hold index 4. 

H7 is a data term which is set to the current level. It is set 
to 0 by the initial leader, and by J165 if cards are read. 

H8 Is the hide-out cell used by the generator processes. 

H9, H10, and Hll are generator working cells. 

W0....W9 initially oontain the symbol 0. 

wlO initially names a data term for random number generation. 

W12....W15 initially contain JO. 

W16....W20 are not used. See above. 

W21 initially names a data term equal to 1. 

W22 initially names a data term equal to 1. 

W23 initially names a list of the system cells. 

W24 initially names a 120 word internal buffer for line printing. 

W25 initially names a data term equal to 1. 

W26...W28 are not used. See above. 

GENERATOR PROCESSES, Pages 40-43 

The generator trace context and level context are not restored. 
Subprocesses may be marked to trace by use of J147..J149. 
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J102, Page 52 

Not available. Hay be ceded ae described In part I of the 
manual, page 82, If desired. 

AUXILIARY STORAGE PROCESSES, Page 52 
Not available. J72 and J74 assume list structure is in memory. 

ARITHMETIC PROCESSES, Pages 55-57 
J110-J113 admit fixed and/or floating data terms only. 
J115-J117 admit fixed and/or floating data terms only. 
J125 admits fixed and/or floating data terms only. 
J128 admits fixed and/or floating data terms only. 

INPUT-OUTPUT CONVENTIONS, Pages 61-64 

Input and output units are assigned as described above. 
Processes J140-J146 are not available. 

MONITOR POINTS AND TRACING, Pages 64-67 

Sense switch 1 on is the signal for terminate for restart. 

Sense switch 2 on is the signal for terminate. 

Sense switch 3 on for full trace. Trace speed is approximately 
40 IPL-V instr/sec. 

No provision is made for suppressing tracing. 

On the printed trace line, if S or (0) is a local symbol, this 
is indicated by an asterisk following the symbol; e.g., 2765*. , 
The designated symbol S is printed only if Q * 1 or 2. 

PRINT PROCESSES, Pages 69-72 

The output unit is always tape 10. When local symbols are 
printed (except in the case of those translated by J150) they 
are followed by an asterisk. 
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If a list structure with a local nam* it printed by J150, 
the converted name will bo 9-0* Sublists of any Hot 
structure are always numbered consecutively starting with 

9-1. 

Data terms are always printed In the format given on page 71, 
with the exception of floating point numbers. The format for 
these Is "-.123456-12"; plus signs are not printed. The field 
length is thus either 10 or 11 columns. 

Cell W24 initially names an internal print buffer of 120 cells 
(one character per cell) length. Other print lines may be 
assigned only by defining, via a type 2 card, a block of 
120 consecutive regional cells. (E.g., 2 PO 120) 
PO would then be a legitimate name for a print buffer linej 
the symbols P1....P119 would be unavailable for other use. 

J158 and J159 leave 1W25 pointing to the first column to the 
left of the entered information. 
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L-23579 



Nr. Henry McCabe 

Electronic Data Processing Department 
Union Carbide Corporation 
300 Madison Avenue, First Floor 
New York 17, Now York 

Dear Nr. No Cab e 1 

An initial, field-test version of the IPL-V (Information 
Processing Language V) interpretive system for the 709/7090 
has been submitted to 3 DA for distribution to all interested 
SHARE members. While this is not a complete version of the 
system as specified in the Programmers • Reference Manual, 
it will suffice to run all but the largest IPL-V problems 
using a 32K machine, and may be used for small IPL-V pro- 
grama on an 8K machine. It is more than adequate to 
indoctrinate the uninitiated in the use of this language. 

This version is completely compatible with the 70* version 
previously submitted to SDA. Users who wish to switch 
from the use of the 70* system to the 709/7090 system at 
a later date may do so with little if any change in the 
IPL-V codes themselves. 

The program has been incorporated as a file on the 
NockDonald system tape in use at The RAND Corporation. 
Interested persons should first obtain the material from 
SDA; we at RAND will be happy to aid users in Incorporating 
the IPL-V system into their own monitors. 

Sincerely, 



C. L. Baker 



CLBsahe 



23 November i960 
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Mr, Donald C, Cashman 

Applied Programning Department 

International Business Machines Corporation 

590 Madison Avenue 

Hew York 22, New York 

Dear Dons 

We enclose the following material for distribution to 
SHARE members I 

1. AM INTRODUCTION TO INFORMATION PROCESSING LANGUAGE V 
(7 pages), 

2. INFORMATION PROCESSING LANGUAGE V MANUAL, Section I, 
(133 pages), 

3. INFORMATION PROCESSING LANGUAGE V MANUAL, Section II 
(92 pages), 

4. RS IPLV Short Write-up (2 pages, 

5. RS IPLV Program Description (11 pages), 

6. SHARE Program Submittal Form (1 page). 
Under separate cover we are mailing to youi 

1. RS IPLV SQUOZB Deck (1193 cards), 

2. RS IPLV Index Cards (3 cards), 

3. RS IPLV Abstract Cards (4 cards). 

This material constitutes the Initial distribution of the 
709/7090 IPLV interpretive system, and should be treated as 
a field-test version of the program. 

Sincerely yours. 



CLBtahe 



C. L. Baker (RS) 
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RS IPLV IPL-V Interpretive System 
C. L. Baker, H. S. Kelly 

The RAND Corporation, Santa Monica, California 
November 25, I960 

PURPOSE 

To interpret and execute programs written in the IPL-V 
language, as described in AN INTRODUCTION TO INFORMATION 
PROCESS INO LANGUAGE V, and INFORMATION PROCESSING LANGUAGE V 
MANUAL, Sections I and II, The RAND Corporation papers P-1929, 
P-1897, and P-1918, i960. 

RESTRICTIONS 

The program is in the form of a closed subroutine, 
designed for compatability with the MockDonald Operating 
System for the 709/7090. The calling sequence is in the same 
format as in the BCS routine within MD. The individual 
installation using this system may incorporate IPL as a file 
on the MD SYSTAP (as has been done at RAND), or execute the 
IPL program in phase I of the system, or integrate with any 
other system with a minimum of effort. The program may be 
run on any 709/7090 of at least 8K storage capacity and having 
at least three tape units. No on-line card reading or 
printing capability is provided. 

METHOD 

The IPL system is read into core, at which time it saves 
the rest of core (which would contain the operating system in 
use) on tape, then reads the IPL-V program into core and 
assembles it. Control is then passed to the IPL-V inter- 
preter. Error detection and tracing capability is provided, 
and a Post-Mortem in IPL-V format is printed at the conclusion 
of execution. Core is then restored from tape, and control 
returned to the calling routine. Execution speed is approxi- 
mately 210,000 IPL-V instructions per minute. 

USE 

See the papers mentioned above for a basic description of 
the system and language; deviations from this description are 
described in the attached write-up. Details of the calling 
sequence for the routine, etc., are also included. 

NOTES 

While this distribution is to be considered a field-test 
trial of the system, it is in use at The RAND Corporation for 
a number of complex problems, including the proof of logic 
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theorems using the General Problem Solver coded In IPL-V. 
This program contains more than 6,000 IPL-V instructions and 
takes more than 500,000 interpretation cycles for a complete 
run. Numerous other large problems have also been interpreted 
and executed. The inclusion of IPL-V in the MockDonald System 
at RAND permits IPL-V Jobs to be stacked with other jobs and 
executed with all of core available to the IPL-V programmer. 

Any questions regarding the operation or correctness of the 
IPL-V system should be directed to: 

C. L. Baker 

The RAND Corporation 

1700 Main Street 

Santa Monica, California. 

Questions concerning the incorporation of the IPL-V system 
into the MockDonald Monitor should be directed to: 

0. E. Bryan 

The RAND Corporation 

1700 Main Street 

Santa Monica, California. 



709/7090 IPL-V 



Program Description 

This write-up is in two parts; the first describing the nature 
of the IPL-V system as a subroutine, the second including 
deviations from and additions to the basic IPL-V manual. 



PART I 

Calling Sequence ; 



cs 




1 - 


LDI 


CNTRL 


cs 






TSX 


AO, 4 


cs 




1 - 


• • • 




cs 


+ 


2 • 


PZE 


SYSPIT,,SYSMIT 


cs 




3 - 


PZE 


SYSPOT, , , . . . 


cs 


+ 


4 « 


PZE 


SYSES1,,SYSES2 


cs 




I: 


• • • 




cs 






PZE 

• 
• 


• * • , , SYS ERR 


cs 




13- 


• 

PZE 

• 
• 


SYSORO, , . . . 


cs 


+ 


29- 


■ 

• 

Return 

* 
• 


cs 




37- 


• 

PZE 


SYSTSL, , • • • 



The above calling sequence is that used within the MockDonald 
Operating System; hence its strange format. Words or parts of 
words indicated by H ..." are not significant. 

Control bits t 

———————— > 

Bits 31-35 of CNTRL are placed in the Sense Indicator Register 
for conveying information to IPL-V as to the nature of the run 
being made. Immediately below is given the meaning of these 
bits; their interpretation is explained in Part 2. 

Bit 35 0 LOAD 
11 " 1 RELOAD 



Bit 34 0 NOTAPE 
" * 1 TAPE 
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Bit 33 0 LIST 
" 1 NOLIST 

Bit 32 0 NTRACE 
" 1 TRACE 

Bit 31 0 NODUMP 
" * 1 DUMP 

The program which includes the calling sequence may interpret a 
control card similar to that used to call SCAT, LOAD, etc., and 
set the bits accordingly. 

Calling Sequence Information ; 

SYSPIT, SYSMIT, SYSMOT, SYSES1, SYSES2 are the locations of tape 
control words. These words must contain the address of the 
physical unit associated with the symbolic tape. (E.g., if 
SYSPIT is on physical unit B2, the control word would have an 
octal address of 02202.) Only the first three tapes are neces- 
sary for using the system. If the address is zero, the unit is 
interpreted as being unavailable. 

SYSTSL is the location of the Tape Status list for reserved tapes. 
It is arranged such that 

AXT CHANNEL, 2 (l for Ch. A, 2 for Ch. B, etc.) 
AXT UNIT,1 (3 for unit 3, etc.) 

CLA* SYSTSL, 2 

will put the address of the corresponding tape control word into 
the decrement of the accumulator. Tapes SYSAR1,2,3, SYS BR 1,2, 
and 3 are interrogated. Again, a zero address is interpreted as 
meaning that the corresponding unit is unavailable. 

SYSERR is the location to which the operator is to transfer in 
case of program error, loop, too much time, etc. Both SYSERR 
and SYSERR-2 are replaced with a transfer to the recovery 
routine for IPL-V; the contents of these cells is saved and 
restored. They must lie in the range 00001- -00077q. 

SYSORO is the name of a cell containing the location of the first 
word following the system in control* Memory up to location 
C( SYSORO) is left undisturbed fcy the execution of IPL-V (with 
the exoeptlon of eell zero.) 

Operation of the IPL-V executive routine, AO ; 

1) All traps are disabled. 

2) The tape control words are interpreted and a table of tape 
information is constructed. 

3) Memory is saved on tape SYSMIT from locations 100g-C( SYSORO) . 
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4) If the RELOAD option is called, Memory is reloaded from 
SYSAR2 • 

5) The remaining Sense indicator bits are interpreted. 

6) Control is passed to the IPL-V system interpreter. 

7) At the conclusion of the IPL-V run (Program finished, error, 
or manual transfer to SYSTEM or SYS ERR) , Memory is restored 
from tape SYSMIT, and control returned to word 29 of the 
calling sequence. 



Notes t 

Although the system has been organized so as 'to work within the 
MockDonald Monitor System, it should be emphasized that it is in 
no way dependent upon any of the routines of that system. Only 
the tape control words of that system need be reproduced (in the 
format explained above) to gain complete independence of that 
By stem. 

All input and output routines are contained within the IPL-V 
system itself. Data is read, in BCD, from tape SYSPIT; output 
is written in BCD on tape SYSPOT. Neither tape is rewound, nor 
is an end of file ever written on SYSPOT. Tape SYSMIT is used 
for saving core only; if it is not desired to retain this 
feature, routines A2 and A3 may be replaced by TRA 1,4. SYSAR1, 
2 and 3 may be used by the IPL-V interpreted program; see 
following section for details. SYSES1,2, SYSBR1,2, and 3 are 
never used, and have been included in the tape set-up routine 
only in anticipation of possible future expansion of the IPL-V 
system. 



Example : 

Following is a complete calling sequence requiring no informa- 
tion from the MockDonald System* 



START 



LDI 


CNTRL 




TSX 


AO, 4 




PZE 






PZE 


SYSPIT, 


, SYSMIT 


PZE 


SYSPOT, 




PZE 


SYSES1, 


UYSES2 


PZE 






PZE 


0,0,3 




PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 


SYSORO 




PZE 






PZE 






PZE 







Manual error transfer to 3g or lg. 
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PZE 








PZE 








PZB 








PZE 








PZE 








PZE 








PZE 








PZE 








PZB 








PZE 








PZE 








PZE 








TRA 


out 






PZE 








PZE 








PZE 








PZE 








PZE 








PZE 








PZE 








PZE 


SYSTSL 




CNTRL 


OCT 


23 


RELOAD, TAPE, LIST, NTRACE 


SYSPIT 


OCT 


2201 


Unit Bl for SYSPIT 


SYSMIT 


OCT 


2202 


Unit B2 for SYSMIT 


SYSPOT 


OCT 


2203 


Unit B3 for SYSPOT 


SYSES1 


PZE 




SYSES1 not used. 


SYSES2 


PZE 




SYSES2 not used. 


SYSAR1 


OCT 


1201 


Unit Al for SYSAR1 


SYSAR2 


OCT 


1202 


Unit A2 for SYSAR2 


SYSAR3 


OCT 


1203 


Unit A3 for SYSAR3 


SYSBR1 


PZE 




SYSBR1 not used. 


SYSBR2 


PZE 




SYSBR2 not used. 


SYSBR3 


PZE 


16384 


SYSBR3 not used. 


SYSORQ 


PZE 


Save lower half of core 




PZE 


CHNLB, 1 






PZE 


CHNLA, 1 




SYSTSL 


PZE 




Tape Status List. 




PZE 


0,,SYSAR3 




PZE 


0,,SYSAR2 




PZE 


0..SYSAR1 


CHNLA 


PZE 








PZE 


0,,SYSBR3 




PZE 


0,,SYSBR2 




PZE 


0,,SYSBR1 


CHNLB 


PZE 







(Example) 
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PART II 

This write-up includes only deviations from and additions to 
the basic IPL-V manual, INFORMATION PROCESSING LANGUAGE V 
MANUAL, Section II, Programmers ' Reference Manual, A. Newell, 
et al, The RAND Corporation paper P-1918, March 31 , i960. 
Familiarity with this manual is assumed, and references are to 
sections and page numbers in this manual. 

INITIAL LOADING, Page 72 

This version is not set up to run multiple IPL-V Jobs. Each 
run must begin with the execution of the calling sequence for 
IPL-V. References to bits 31-35 refer to the setting of the 
Sense Indicator register on entry to IPL-V. (See Part 1.) The 
IPL-V program, set up as described on page 79 , is assumed to be 
on tape SYSPIT, in BCD. This tape is not rewound prior to 
reading. 

All output is off-line, on tape SYSPOT. This tape is never 
rewound, nor is an end-of-file written. This permits stacking 
of the IPL-V output with other Jobs adhering to the same 
output conventions. 

A TYPE 9 CARD (page 78) is treated as a type 1 comment card, as 
no multiple Job provisions are included. 

TYPE 2 CARDS do not have the full flexibility described on 
pages 73-7 1 *. Only the NAME and LINK fields are read; the first 
character of the NAME field must be the region symbol; the LINK 
field must contain the extent of the region. The first example 
in page 7^ is the only acceptable format for type 2 cards. 

A TYPE 3 CARD , if it appears, must precede any type 2 cards. 
It may be used to reserve a block of storage for binary IPL-V 
routines written by the programmer. The block will start at 
location IOOq, and the extent of the block will be as given in 
LINK. No other uses for type 3 cards are permitted. A block 
of storage has already been reserved for line printing; other 
print lines may be reserved by other means (see below under 
line printing) . 

TYPE 5 CARDS do not have the full flexibility as specified on 
pages 77-78. P must be zero or blank for standard IPL format, 
or 3 for absolute column binary format. Q is interpreted as 
described; however, there is a maximum of 150 local symbols and 
a maximum of 100 internal symbolics that may be used per 
routine or data list structure. 

SYMB does not control the input unit, and is disregarded unless 
regional. 
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LINK character d is ignored; the only output from the assembly 
process is the listing on SYSPOT, as controlled by character c. 

TYPE 6 AND 7 CARDS are treated as type 5 headers as no auxiliary 
storage capability is included. 

NOTE: TYP E 1 CARDS should not appear in the middle of a program 
or data list following a program or data card with a blank 
SYMB or LINK. This will lead to an error which is not detected 
at assembly time. (The blank LINK or SYMB is treated as 0.) 

ABSOLUTE B INARY INPUT . A type 5 card with P - 3 indicates that 
a block of absolute, column binary, cards follows. These must 
load into the space reserved by the single type 3 card at the 
beginning of the program. The last binary card must be J 
transfer card; the address is ignored, however. After the binary 
cards have been read, the symbols HO, JO, and WO are stored in 
the address parts of location 100o, 101 Q , and 102a, respectively. 
This permits the programmer to refer to these regions conveniently 
when coding machine language programs. 

ALTERNATIVE INPUT UNIT . Provision has been included for reading 
Input from tape S^AKl in BCD format if desired Sense indicator 
bit Ik controls this function. If bit 3* is TAPE when the pro- 
gram is first loaded, the IPL-V loader will Initially read from 
tape SYSAR1 In BCD. The order and format of cards on this tape 
must be identical to that used for on-line reading of J* 1 * 8 - 
When an end-of-file is encountered on this tape, the IPL-V loader 
ES a?tempt to read from tape SY SPIT -Printing of the assembly 
of tape SYSAR1 may be suppressed by setting bit 33 to NOLIST, V? 
this case only the header cards from SYSAR1 will print. If 
bit 33 is LIST, printing control is from character c of tne 
header cards on the tape. 

EXAMPLE. A short IPL-V program is to be loaded and • 
fi^dec k should be set up exactly as described, and written on 
SyIp?? in BCD. Bit 3* should be NOTAPE Execut ion of the IPL-V 
calling sequence will cause the program to be loaded and 
executed as described. 

eyiKpr xr a lone IPL-V Drogram is to be loaded and executed, 
rffiipe sKe prepared off-line; the deck set -up should 
be exactly as described, except that the final type five card 
sWa not 11 written on the tape. The data is followed by an 
end-of-file on this tape. To load and execute, this tape is 
mounted on unit SYSAR1. The final type five card is loaded on 
SYSPIT, with bit 34 - TAPE, bit 35 - LOAD. Loading and execu- 
tion will take place as described. 

For subsequent runs, with routines to be changed or new data 
added; the same tape SYSAR1 may be mounted, and the corrected 
Routines and data loaded on SYSPIT before the f Inal type five 
card. Since the changed routines or data are read from SYSPIT 
after tape SYSAR1 has been read, the corrections will be made 
before Interpretation begins. 
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INPROCESS LOADING, Page 80 

The restrictions that apply to initial loading also apply to 
inprocess loading. Note that type 2 and type 3 cards may not be 
loaded. Regional symbols which were initially assigned by 
type 2 cards are still available, as unused regionals are NOT 
returned to available space. (This compensates somewhat for 
the lack of type 3 symbol reservation.) 

SAVE FOR RESTART, Page 8l 

J166 should read SAVE ON TAPE SYSAR3 FOR RESTART. All of 
memory is written onto tape, and the program continues from that 
point. The tape is rewound after writing, so that multiple 
occurrences of J166 will cause the tape to be rewritten. Bit 31 
should be DUMP if Jl66 is to be used. , 

Jl67 is not available, as no auxiliary storage is provided. 

RELOADINQ . Reloading is from the tape written by J166. The 
tape should be mounted on tape SYSAR2; bit 35 • RELOAD is used 
to initiate the reload process. After reloading, control is 
returned to exactly the same place in the execution of Jl66 as 
when memory was saved. 

EXAMPLE . A program is to be loaded, saved immediately for sub- 
sequent restart, and the program is then to be executed. On 
reloading, it is desired to make changes or corrections before 
execution. 

Include a one-word routine in the program as follows: 

NAME SYMB LINK 
RO J166 J165 

Place two type 5 termination cards at the end of the deck; the 
first wTEh a SYMB of RO, the second naming the start of the 
program; bit 35 - LOAD, bit 31 - DUMP. Operation is then as 
follows: The program is read in and assembled, and interpreta- 
tion begins with instruction RO. Jl66 will save memory on 
SYSAR3, and the program will continue with the interpretation 
of the instruction, which links to JI65. JI65 will read more 
routines and data, including termination cards. Since the only 
card remaining is a termination card, interpretation will begin 
with the first instruction of the program. 

To reload, place the corrected routines or data lists on SYSPIT, 
each preceded by the proper type 5 header card, and followed 
with the same two termination cards. The tape written on the 
first pass is mounted on tape SYSAR2. Bit 35 " RELOAD, bit 3^ * 
NOTAPE, bit 31 * DUMP. Immediately after reload, interpretation 
will continue at RO; and JI65 will read the corrections into 
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memory. The first termination card will repeat the save process 
on SYSAR3; the second will initiate the interpretation of the 
corrected program. 

NOTE : The same procedure may be used when the Initial program 
Toad" is from SYSAR1 in BCD. Bit 34 should be NOTAPE on reload, 
however, so that JI65 will be prepared to read corrections from 
SYSPIT rather than SYSAR1. 

TAPE UNIT SUMMARY 

BCD Input tape (never rewound) . 

BCD Output tape (never rewound; no end-of-f lies) . 
Alternate BCD Input tape (under control of bit 34). 
Reload tape (under control of bit 35). 

Save for Restart tape (under control of bit 31 and Jl66§| 



OPERATION OP THE INTERPRETER 

Interpretation begins within the system by interpreting the 
Instruction 

0 0 Xxx J7, 

where Xxx is the routine named on the final type 5 termination 
card. Interpretation will continue until the J7 is linked to, 
at which time the program will print PROGRAM RAN TO COMPLETION 
on the output tape. Other terminations will occur if the pro- 
grammer executes the routine J7, or if the interpreter or a 
primitive process detects any one of a number of errors. In 
case of such a termination, the reason will be printed on the 
output tape, followed by an IPL-V POST MORTEM. The post mortem 
consists of a print-out of the lists named on the list named by 
system cell W23. Initially this list names all the system cells, 
HO through W29. The programmer may replace this list with 
another list, or add symbols to this list. Control is returned 
to 29,4 of the IPL-V calling sequence after execution. 

ERROR TRAP, J170, Page 82 . 

The error trap function is not provided; see above for error 
action. 

SYSTEM CELLS, Page 35 
Exceptions and additions are as follows: 
HO initially contains the symbol 0. ' 



TAPE SYSPIT. 
TAPE SYSPOT. 
TAPE SYSAR1. 
TAPE SYSAR2. 
TAPE SYSAR3. 
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H2 will initially be about 26,000 cells for a 32K machine. 

H3 is set to 1 by the initial loader. 

H4 not used as no auxiliary storage is provided. 

H5 is initially set to J4(+) . 

H6 is used by machine language recursive routines to hold 
index 4. 

H7 is a data term which is set to the current level. It is 
set to 0 by the initial loader, and by JI65 if cards 
are read. 

H8 is the hide-out cell used by the generator processes. 
H9> H10, and Hll are generator working cells. 
W0....W9 initially contain the symbol 0. 

V10 initially names a data term for random number generation. 

W12....W15 initially contain JO. 

V16....W20 are not used. See above. 

W21 initially names a data term equal to 1. 

W22 initially names a data term equal to 1. 

W23 initially names a list of the system cells. 

W24 initially names a 120 word internal buffer for line printing. 

W25 initially names a data term equal to 1. 

W26...W28 are not used. See above. 

GENERATOR PROCESSES, Pages 40-43 

The generator trace context and level context are not restored. 
Subprocesses may be marked to trace by use of J147 . . J149 . 

J102, Page 52 

Not available. May be coded as described in part, I of the 
manual, page 82, if desired. 
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AUXILIARY STORAGE PROCESSES, Page 52 
Not available. J72 and J74 assume list structure Is In memory. 

ARITHMETIC PROCESSES, Pages 55-57 
J110-J113 admit fixed and/or floating data terms only. 
J115-J117 admit fixed and/or floating data terms only. 
J125 admits fixed and/or floating data terms only. 
J128 admits fixed and/or floating data terms only. 

INPUT-OUTPUT CONVENTIONS, Pages 61-64 

Input and output units are assigned as described above. Pro- 
cesses J140-J146 are not available. 

MONITOR POINTS AND TRACINO, Pages 64-67 

No console signals are provided. Terminate for restart is not 
available. The program may be terminated by a manual TRA SYSERR 
or SYSTEM. Sense bit 32 - TRACE signals full trace. Trace 
speed is approximately 80 IPL-V instr/sec. Bit 32 - NTRACE gives 
normal tracing modes. 

No provision is made for suppressing tracing. 

On the printed trace line, if S or (0) is a local symbol, this 
is indicated by an asterisk following the symbol; e.g., 2765*. 
The designated symbol S is printed only if Q • 1 or 2. 

PRINT PROCESSES, Pages 69-72 

The output unit is always SYSPOT. When local symbols are 
printed (except in the case of those translated by J150) they 
are followed by an asterisk. 

If a list structure with a local name is printed by J150, the 
converted name will be 9-0. Sublists of any list structure are 
always numbered consecutively starting with 9-1. 

Data terms are always printed in the format given on page 71, 
with the exception of floating point numbers. The format for 
these is "-.123456-12"; plus signs are not printed. The field 
length is thus either 10 or 11 columns. 

Cell W24 initially names an internal print buffer of 120 cells 
(one character per cell) length. Other print lines may be 
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assigned only by defining, via a type 2 card, a block of 120 
consecutive regional cells. (E.O., 2 PO 120) 
PO would then be a legitimate name for a print buffer line; 
the symbols P1....P119 would be unavailable for other use. 

J158 and J159 leave 1W25 pointing to the first column to the 
left of the entered information. 



SHARE PROGRAM SUBMITTAL 
(Complete in Black Ink) 



Although each program has been tested by its contributor, no warranty, ex- 
press or implied, is made by the contributor, SHARE or IBM as to the 
accuracy and functioning of the program and related program material and 
no responsibility is assumed by the contributor, SHARE or IBM in con- 
nection therewith. 
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MAJOR DIFFERENCES BETWEEN IPL-V'S 
OF 11/22/60 AND 6/22/61 



^1. An extra word is referenced In the calling sequence. The 
decrement of 3,4 contains the address of a cell containing 
the number of pages of output expected. This number is 
multiplied by 64 to give a line count. If this is zero, 
a count of 6000 lines is assumed. When the line count is 
exceeded, and error message and post mortem are printed. 

y 2. On a manual transfer to SYSERR, an attempt is made to print 
a post mortem. On a transfer to SYSERR-2, no attempt is 
made, and the system cleans up immediately. 

»/ 3. The interrogation of the tape status list now includes 

SYSAR4 and 5, and SYSBR4 and 5. Any or all of these ten 
reserved tapes may be used by J15n and/or J166. 

" 4. Type 3 cards are all handled but may not use absolute loca-? 
tions for reserving space. The corresponding type 2 card 
must have already appeared . When P«l , Q«l , the BCD info 
is read from columns 1-72 of the next card; and if the 
line length is greater than 72, from columns 1-47 of the 
second card. T&|| maximum line length is 119 characters. 

«/5. Type 6 or 7 header cards may be used to put routines on 
auxiliary tape storage . (The back end of SYSMIT is used 
for this.) If a type 6 or 7 header is used for data, type 
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5 is assumed. A buffer longer than the longest routine 
on auxiliary must have been specified by a type 3 card. 
The head of the routine is set to Q-7, LINK -no. of routine 
on auxiliary. 

A block of storage for absolute routines need not have 
been reserved before loading these. If none was reserved, 
H, J, and W locations are stored in -3, -2, and -1. This 
is useful for loading routines into available space not 
yet used, by patching av. sp. around the area loaded. 
(See the line read primitives for an example.) 

J165 will also load routines to auxiliary storage, includ- 
ing new copies of old routines. 

Jl 66 now takes the name of an integer data term as an 
input. The value of this data determines the unit used 
for saving. 0 denotes the normal unit, SYSAR3 . 1 thru 
5 denote SYSAR1 thru 5# 6 thru 10 denote SYSBR1 thru 5. 
Reloading is still from SYSAR2, always. 

The routine previously written as: R99 J166 JI65 

would now be written as: R99 10 9-1 

J166 J165 
9-1 +01 0 

Thirteen extra lists are printed following W29 on the post 
mortem. These contain information about J105-J107 usage. 
(See listing for details.) The contents of the current 
print line (1W24) is also printed. 



IPL-V 
-3- 

>^iO. H2 has about 24,000 cells Initially. H12 is a cell used 
by the generator processes. W20 controls the output unit 
for J15n. 

11. The arithmetic processes now handle all types of data 
terras. Conversion of BCD and octal to other types is 
primarily accomplished by changing q only. 

12. The data term named in W20 (set to 0 initially) controls 
the output unit and mode for J150, J152, J153, and J155. 
0 denotes the normal print mode on unit SYSPOT. 1 thru 

5 denote print mode on units SYSAR1 thru 5i 6 thru 10 de- 
note print mode on units SYSBR1 thru 5i 11 thru 15 denote 
punch mode (first 80 characters only, no spacing character) 
on units SYSAR1 thru 5; and 16 thru 20 denote punch mode 
on units SYSBR1 thru 5. An end-of-file is written on any 
units so used, before exit from IPL. 

13. The generator trace modes and levels will operate as in 
the manual provided generators are executed from the left. 

\/lk. Processes J105, J107, and J108 are operating. Tapes 

SYSES1 and SYSES2 are used for data filed in auxiliary. 
J72, J74, J100, and J101 operate on data list structures 
in auxiliary. 

v^f5. All routines and data on auxiliary storage are saved and 
reloaded by J166 and the reload options. 
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. Unused regional symbols are returned to the end of av. 
space at the end of loading; if new regionals are required 
on a subsequent reload, they should be reserved with a 
type 3 card at initial load. The unused regionals are not 
removed from the symbol table, however, and references to 
them at reload time will really be references to cells on 
available space — probably causing trouble. 



L. Baker 



Revised 7/1/61 



709/7090 IPL-V 
PROGRAM DESCRIPTION 



This write-up is in two parts: the first describing the 
nature of the IPL-V system as a subroutine, the second in 
eluding deviations from and additions to the basic IPL-V 
manual . 



PART I 

CALLING SEQUENCE 



cs 




1 




LDI 


CNTRL 


cs 








TSX 


AO, 4 


cs 


+ 


1 


s 


• • • 




cs 


+ 


2 




PZE 


SYSPIT,,SYSMIT 


cs 


+ 


3 


tx 


PZE 


SYSPOT, , PAGES 


cs 


+ 


4 


m 


PZE 


SYSES1,,SYSES2 


cs 


+ 


5 


st 


• • • 




cs 


+ 


6 




PZE 


» • * , , SYS ERR 


cs 


+ 


13 




PZE 


SYSORG,,... 


cs 


+ 


29 


m 


Return 


cs 


+ 


37 




PZE 


SYSTSL , , « • • 



The above calling sequence is that used within the MockDonald 
operating system; hence its strange format. Words or parts 
of words indicated by are not significant. 



CONTROL BITS 

Bits 31-35 of CNTRL are placed in the sense indicator register 
for conveying information to IPL-V as to the nature of the run 
being made. Immediately below is given the meaning of these 
bits; their interpretation is explained in Part 2. 

Bit 35 0 LOAD 
Bit 35 1 RELOAD 
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Bit 


34 


0 


NOT APE 


£51 1/ 




X 


TAPE 


Bit 


33 


0 


LIST 


Bit 


33 


1 


NOLIST 


Bit 


32 


0 


NTKACE 


Bit 


32 


1 


TRACE 


Bit 


31 


0 


NODUMP 


Bit 


31 


1 


DUMP 



The program which includes the calling sequence may interpret 
a control card similar to that used to call SCAT, LOAD, etc., 
and set the bits accordingly. 



CALLING SEQUENCE INFORMATION 

SYSPIT, SYSMIT, SYSMOT, SYSES1, SYSES2 are the locations of 
tape control words. These words must contain the address of 
the physical unit associated with the symbolic tape. (E.g., 
if SYSPIT is on physical unit B2, the control word would have 
an octal address of 02202.) Only the first three tapes are 
necessary for using the system. If the address is zero, the 
unit is interpreted as being unavailable. 

SYSTSL is the location of the tape status list for reserved 
tapes. It is arranged such that 

AXT CHANNEL, 2 (1 for Ch. A, 2 for Ch. B, etc.) 
AXT UNIT,1 (3 for Unit 3, etc.) 

CLA* SYSTSL, 2 

will put the address of the corresponding tape control word 
into the decrement of the accumulator. Tapes SYSAR1, 2, 3, 
4, 5, SYSBR1, 2, 3, 4, and 5 are interrogated. Again, a zero 
address is interpreted as meaning that the corresponding unit 
is unavailable. 

SYSERR and SYSERR-2 are the locations to which the operator 
is to transfer in case of program error, loop, too much time, 
etc. Both SYSERR and SYSERR-2 are replaced with a transfer 
to the recovery routine for IPL-V; the contents of these cells 
is saved and restored. They must lie in the range 00001 - 
00077g. The entry from SYSERR attempts to give an IPL-V post 
mortem before exit; the entry from SYSERR-2 causes an immedi- 
ate exit from IPL-V. 

SYSORG is the name of a cell containing the location of the 
first word following the system in control. Memory up to loca- 
tion C( SYSORG) Is left undisturbed by the execution of IPL-V 
(with the exception of cell zero) . 
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PAGES is the location of a cell containing the approximate num- 
ber of pages of output expected. This number is multiplied by 
6k to give a line count. (A line count of zero is replaced 
with a count of 6000.) An error condition is sensed when the 
output (from assembly, tracing, J150, J151, J152, J153, or 
J155, printing or punching) exceeds the expected amount. The 
line count is then reset so that a post mortem may be printed. 



OPERATION OF THE IPL-V EXECUTIVE ROUTINE, AO 

1. All traps are disabled. 

2. The tape control words are interpreted, and a table of tape 
information is constructed. 

3. Memory is saved on tape SYSMIT from locations lOOg-C(SYS0RG) . 

k. If the RELOAD option is called, memory is reloaded from 
SYSAR2. 

5. The remaining sense indicator bits are interpreted. 

6. Control is passed to the IPL-V system interpreter. 

7. At the conclusion of the IPL-V run (program finished, error, 
or manual transfer to SYSERR-2 or SYSERR), memory is restored 
from tape SYSMIT and control returned to word 29 of the call- 
ing sequence. 



NOTES 

Although the system has been organized so as to work within the 
MockDonald monitor system, it should be emphasized that it is 
in no way dependent upon any of the routines of that system. 
Only the tape control words of that system need be reproduced 
(in the format explained above) to gain complete independence 
of that system. 

All input and output routines are contained within the IPL-V 
system itself. Data is read, in BCD, from tape SYSPIT; output 
is written in BCD on tape SYSPOT. Neither tape is rewound, nor 
is an end -of -file ever written on SYSPOT. Tape SYSMIT is used 
for saving core and for auxiliary routine storage. SYSAR1, 2, 
3, 4, 5, SYSBR1, 2, 3, 4, and 5 may be used by the IPL-V inter- 
preted program. See following section for details. 
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EXAMPLE 

Following is a complete calling sequence requiring no infor- 
mation from the MockDonald system: - 



START 


LDI 


r% tin it>t 

CNTRL 




TSX 


A /\ It 

AO, h 




PZE 






PZE 


SYSPIT; 




PZE 


SYSPOT, 




PZE 


SYSES1 , 




PZE 






PZE 


0,0,3 




PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 


SYSORG 




PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 


• 




PZE 






PZE 






T"\ f» TT» 

PZE 






PZE 






PZE 






PZE 






PZE 






TRA 


UUC 




FZE 






PZE 






PZ& 






PZE 






PZE 






PZE 






PZE 






PZE 


SYSTSL 


CNTRL 


OCT 


23 


SYSPIT 


OCT 


2201 


SYSMIT 


OCT 


2202 


SYSPOT 


OCT 


2203 


SYSES1 


OCT 


1204 


SYSES2 


OCT 


1205 


SYSAR1 


OCT 


1201 


SYSAR2 


OCT 


1202 



(Manual Error Transfer to 3g or lg.) 



RELOAD, TAPE, LIST, NTRACE, DUMP 
Unit Bl for SYSPIT 
Unit B2 for SYSMIT 
Unit B3 for SYSPOT 
Unit A4 for SYSES1 (If Aux. 
Unit A5 for SYSES2 (If Aux. 
Unit Al for SYSAR1 
Unit A2 for SYSAR2 



(Example) 



Data Storage Used] 
Data Storage Used] 



IPL-V 

5 



SYSAR3 


OCT 


1203 Unit A3 for SYSAR3 


SYSAR4 


PZE 


SYSAR4 Not Used 


SYSAR5 


PZE 


SYSAR5 Not Used 


SYSBR1 


PZE 


SYSBR1 Not Used 


SYSBR2 


PZE 


SYSBR2 Not Used 


SYSBR3 


PZE 


SYSBR3 Not Used 


SYSBR4 


OCT 


2204 Unit B4 for SYSBR4 


SYSBR5 


OCT 


2205 Unit B5 for SYSBR5 


SYSORO 


PZE 


16384 Save lower half of 




PZE 


CHNLB, 1 




PZE 


CHNLA, 1 


SYSTSL 


PZE 


Tape Status List 




PZE 


0,,SYSAR5 




PZE 


0,,SYSAR4 




PZE 


0, ,SYSAR3 




PZE 


0,,SYSAR2 




PZE 


0, ,SYSAR1 


CHNLA 


PZE 






PZE 


0,,SYSBR5 




PZE 


0,,SYSBR4 




PZE 


0,,SYSBR3 




PZE 


0,,SYSBR2 




PZE 


0,,SYSBR1 


CHNLB 


PZE 


200 Approximate Number 


PAGES 


DEC 



(If Used) 
(If Used) 
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PART II 



This write-up includes only deviations from and additions to 
the basic IPL-V manual, INFORMATION PROCESSING LANGUAGE V 
MANUAL, Section II, Programmers 1 Reference Manual, A. Newell, 
et al. The RAND Corporation pape r P-191o, March jl, I960. 
Familiarity with this manual is assumed, and references are 
to sections and page numbers in this manual. 



INITIAL LOADING, Page 72 

This version is not set up to run multiple IPL-V Jobs. Each 
run must begin with the execution of the calling sequence for 
IPL-V. References to bits 31-35 refer to the setting of the 
sense indicator register on entry to IPL-V. (See Part I.) 
The IPL-V program, set up as described on page 79, is assumed 
to be on tape SYSPIT, in BCD. This tape is not rewound prior 
to reading. 

All assembly, tracing, error, and post mortem output is off- 
line, on tape SYSPOT. This tape is never rewound, nor is an 
end-of-file written. This permits stacking of the IPL-V out- 
put with other Jobs adhering to the Same output conventions. 
Output from J150, J151, J152, J153, and J155 may be on reserved 
tapes if so specified (see below). An end-of-file is written 
on reserved tapes so used, at the conclusion of the program. 



A TYPE 9 CARD (page 78) is treated as a type 1 comment card, 
as no multiple Job provisions are included. 



TYPE 2 CARDS do not have the full flexibility described on 
pages ?3-74. Only the NAME and LINK fields are read; the first 
character of the NAME field must be the region symbol; the 
LINK field must contain the extent of the region. The first 
example on page 74 is the only acceptable format for type 2 
cards . 



TYPE 3 CARDS (page 75), if they appear, must follow any type 
2 cards to which they refer. For Q«l, the number of words set 
aside for a print line may vary from 1 to 119. One word is 
required for each position in the print line. The word at SYMB 
is set to P-OjQ-O^YMB-location of line,LINK»length of line. 
If, in addition, P is not zero or blank, the line is filled 
from the next one or two cards. The first 72 (or less) posi- 
tions are filled from cols. 1-72 of the next card; if the line 
length is greater than 72 positions, the remaining positions 
are filled from cols. 1-47 of the second following card. Q-2 
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is used to reserve a block of storage for binary IPL-V routines 
written in machine language. LINK specifies the extent of the 
block; the starting position of the block will depend upon the 
number of locations previously assigned by type 2 or type 3 
cards. If this is the first card to reserve space, the origin 
will be at 100ft. Q«3 is used to reserve a buffer for routines 
to be stored in auxiliary storage. LINK specifies the extent 
of the block; the starting position will again depend upon 
previous assignments. 



TYPE 5 CARDS do not have the full flexibility as specified on 
pages 77-78. P must be zero or blank for standard IPL format, 
or 3 for absolute column binary format. Q is interpreted as 
described; however, there is a maximum of 150 local symbols 
and a maximum of 100 internal symbolics that may be used per 
routine or data list structure. 

SYMB does not control the input unit, and is disregarded unless 
regional . 

LINK character d is ignored; the only output from the assembly 
process is the listing on SYSPOT, as controlled by character c. 



Type 6 AND 7 CARDS are treated identically, as only slow aux- 
iliary routine storage is provided. If either P or Q is not 
zero or blank, they are treated as type 5 cards (i.e., data 
and binary programs may not be loaded to auxiliary storage.) 
If Q is zero or blank, the following routines are loaded into 
the auxiliary buffer, which must have been reserved by a type 
3, Q«3 card. Each routine is then written on tape SYSMIT 
(following the record which was used to save memory) . The 
head of a routine loaded to auxiliary is set to P=0,Q«7,SYMB« 
number of this routine on the auxiliary tape. Routines placed 
on auxiliary storage are automatically called in by the inter- 
preter for execution and are automatically saved and reloaded 
by J166 and the reload processes. 



NOTE: TYPE 1 CARDS should not appear in the middle of a pro- 
gram or data list following a program or data card with a 
blank SYMB or LINK. This will lead to an error which is not 
detected at assembly time. (The blank LINK or SYMB is treated 
as zero.) 



ABSOLUTE BI NARY INPUT . A type 5 card with P-3 indicates that 
a block of absolute, column binary cards follows. These must 
load into the space reserved by the single type 3, Q«2 card 
at the beginning of the program. The last binary card must 
be a transfer card; the address i3 ignored, however. After 
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the binary cards have been read, the symbols HO, JO, and WO 
are stored in the address parts of the first three cells of 
the reserved block. This permits the programmer to refer to 
these regions conveniently when coding machine language rou- 
tines. If no space has been reserved for machine language 
routines, the cards will still be loaded. This feature may 
be used to load into unused available space; care must be 
taken to terminate available space or to link in around the 
routines so loaded. When this option is used, the symbols 
HO, JO, and WO are placed in the address parts of cells -3, 
-2, and -1. 



ALTERNAT IVE INPUT UNIT . Provision has been included for 
reading input from tape SYSAR1 in BCD format if desired. 
Sense indicator bit 34 controls this function. If bit 34 is 
TAPE when the program is first loaded, the IPL-V loader will 
initially read from tape SYSAR1 in BCD. The order and format 
of cards on this tape must be identical to that used for on- 
line reading of cards. When an end-of-file is encountered 
on this tape, the IPL-V loader will attempt to read from tape 
SYSPIT. Printing of the assembly of tape SYSAR1 may be sup- 
pressed by setting bit 33 to NOLIST; in this case only the 
header cards from SYSAR1 will print. If bit 33 is LIST, 
printing control is from character c of the header cards on 
the tape. 



EXAMPLE . A short IPL-V program is to be loaded and executed. 
The deck should be set up exactly as described and written 
on SYSPIT in BCD. Bit 34 should be NOTAPE. Execution of the 
IPL-V calling sequence will cause the program to be loaded 
and executed as described. 



EXAMPLE . A long IPL-V program is to be loaded and executed. 
A BCt) tape should be prepared off-line; the deck set-up should 
be exactly as described, except that the final type 5 card 
should not be written on the tape. The data is followed by 
an end-of-file on this tape. To load and execute, this tape 
is mounted on unit SYSAR1. The final type 5 card is loaded 
on SYSPIT, with bit 34-TAPE, bit 35-LOAD. Loading and execu- 
tion will take place as described. 

For subsequent runs, with routines to be changed or new data 
added, the same tape SYSAR1 may be mounted, and the corrected 
routines and data loaded on SYSPIT before the final type 5 
card. Since the changed routines or data are read from SYSPIT 
after tape SYSAR1 has been read, the corrections will be made 
before interpretation begins. 
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INPROCESS LOADING ( J165) , Page 80 



Any restrictions that apply to initial loading also apply to 
inprocess loading. Note that type 2 and type 3 cards may not 
be loaded. New routines may be loaded to auxiliary storage, 
as may new copies of old routines. 

Unused regionals were returned to the end of available space 
at the end of the initial loading process. If new regionals 
are required when loading more routines and data with J165, 
they should be reserved by type 3 cards at initial load. The 
locations of unused regional symbols returned to available 
space are still referenced by the internal symbol table, how- 
ever, and an error will not be detected if JI65 loads into 
them. All such references will be to cells on available space; 
this will result in an improperly constructed available space 
list and will usually lead to errors when the program is run- 
ning. 



J166 saves on the tape specified by the integer data term 
named (0) . If this data term is 0, memory is saved on tape 
SYSAR3. Other allowable tapes are specified as follows: 



Other values of (0) will cause an error, as will reference to 
an unassigned tape. All of memory, plus any auxiliary routines 
or auxiliary data used, is saved on tape, and the program con- 
tinues from that point. The tape is rewound after writing, 
so that multiple occurrences of J166 with the same input will 
cause the tape to be rewritten. Bit 31 of CNTRL (above) should 
be DUMP if J166 is to be used. 

J167 is not available. 



RELOADING . Reloading is from the tape written by J166. The 
tape should be mounted on tape SYSAR2; bit 35*RELOAD is used 
to initiate the reload process. After reloading, control is 
returned to exactly the same place in the execution of J166 
as when memory was saved. 



EXAMPLE . A program is to be loaded, saved immediately for 
subsequent restart, and the program is then to be executed. 



SAVE FOR RESTART, Page 81 



1- SYSAR1 

2- SYSAR2 
3=SYSAR3 

4- SYSAR4 

5- SYSAR5 



6-SYSBR1 
7«SYSBR2 
8=SYSBR3 
9-SYSBR4 
10-SYSBR5 



IPL-V 
10 



On reloading, It is desired to make changes or corrections 
before execution. 

Include a one-word routine in the program as follows: 

NAME P Q SYMB LINK 
RO 10 9-1 

J166 J165 
9-1+0 1 0 

Place two type 5 termination cards at the end of the deck; 
the firsT with a SYMB of RO, the second naming the start of 
the program; bit 35-LOAD, bit 31-DUMP. Operation is then as 
follows: The program is read In and assembled, and interpre- 
tation begins with instruction RO. J166 will save memory on 
SYSAR3, and the program will continue with the interpretation 
of the instruction, which links to J165. Jlo5 will read more 
routines and data, including termination cards. Since the 
only card remaining is a termination card, Interpretation will 
begin with the first Instruction of the program. 

To reload, place the corrected routines (including any correc- 
tions to routines on auxiliary storage) or data lists on SYSPIT, 
preceded by the proper type 5, 6, or 7 header cards, and fol- 
lowed with the same two termination cards. The tape written on 
the first pass is mounted on tape SYSAR2. Bit 35«*REL0AD, bit 
34-NOTAPE, bit 31-DUMP. Immediately after reload, interpreta- 
tion will continue at RO; and J165 will read the corrections 
into memory. The first termination card will repeat the save 
process on SYSAR3; the second will initiate the interpretation 
of the corrected program. 

NOTE: The same procedure may be used when the initial program 
Toad" is from SYSAR1 in BCD. Bit Zk should be NOTAPE on reload, 
however, so that JI65 will be prepared to read corrections from 
SYSPIT rather than SYSAR1. 

TAPE UNIT SUMMARY 
TAPE SYSPIT. BCD input tape (never rewound) . 

TAPE SYSPOT . BCD output tape (never rewound; no end-of -files) . 

TAPES SYSES1-2. Auxiliary storage for data list structures 
(J105, J107, J 108) . 

TAP E SYSAR1 . Alternate BCD input tape (under control of bit 

TAPE SYSAR2 . Reload tape (under control of bit 35) . 

TAPE SYSMIT. Auxiliary routines, if loaded, are written follow- 
ing the record which is used to save memory on entry to IPL-v. 
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TAPE SYSAR3 . Normal save-for-restart tape (written by J166) . 

TAPES SYSAR1 -5. SYSBRl-5 * As used by J150, J151, J152, J153, 
J155, J166. If used by other than J166, and end-of-flle is 
written at end of program. 



OPERATION OP THE INTERPRETER 

Interpretation begins within the system by interpreting the 
instruction 

000 Xxx J7 , 

where Xxx is the routine named on the final type 5 termina- 
tion card. Interpretation will continue until the J7 is linked 
to, at which time the program will print PROGRAM RAN TO COM- 
PLETION on the output tape. Other terminations will occur *f 
the programmer executes the routine J7, or if the interpreter 
or a primitive process detects any one of a number of errors. 
In case of such a termination, the reason will be printed on 
the output tape, followed by an IPL-V POST MORTEM. The post 
mortem consists of a print-out of the lists named on the list 
named by system cell W23. Initially this list names all the 
system cells, HO through W29, plus 13 cells containing infor- 
mation about J105-J107 usage (see auxiliary data storage). 
In addition, the current print line, 1W24, is printed. The 
programmer may replace this list with another list, or add sym- 
bols to this list. Control is returned to 29 ,h of the IPL-V 
calling sequence after execution of an IPL-V program. 



ERROR TRAP, J170, Page 82 

The error trap function is not provided; see above for error 
action. 



SYSTEM CELLS. Page 35 
Exceptions and additions are as follows: 
HO initially contains the symbol 0. 

H2 will initially be about 24,000 cells for a 32K machine. 

H3 is set to 1 by the initial loader. 

H4 is not used, as no auxiliary storage is provided. 

H5 is initially set to J4(+) . 
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H6 is used by machine language recursive routines to hold 
index 4. 

H7 is a data term which is set to the current level. It is 

set to 0 by the initial loader, and by J165 if cards are read. 

H8 is the hide-out cell used by the generator processes. 

H9, H10, Hll, and H12 are generator -working cells. 

WO ... W9 initially contain the symbol 0. 

W10 initially names a data term for random number generation. 
W12 ... W15 initially contain JO. 
W16 ... W19 are not used. 

W20 initially names a data term equal to 0. 

W21 initially names a data term equal to 1. 

W22 initially names a data term equal to 1. 

W23 initially names a list of the system cells. 

W24 initially names a 120-word internal buffer for line print- 
ing. 

W25 initially names a data term equal to 1. 
W26 ... W28 are not used. See above. 
W29 initially contains the symbol 0. 

GENERATOR PROCESSES, Pages 40-43 

The generator trace context and level context are handled as 
described, provided that generators are always executed from 
the left. Both generators and subprocesses may be on auxiliary 
storage; subprocesses must have regional names if on auxiliary. 

J102, Page 52 

Not available. May be coded as described in Part I of the 
manual, page 82, if desired. 



IPL-V 
13 



AUXILIARY STORAGE FOR DATA LIST STRUCTURES » Page 52 

J106 is not available, as only slow storage is provided. 

A data list structure is filed as a series of binary records 
on the current auxiliary tape unit; the address of this unit 
(SYSES1 or SYSES2) is controlled automatically. The head of 
a list structure filed in auxiliary storage contains this ad- 
dress in SYMB, the number of the first record of the structure 
on the tape appears in LINK, and Q«7 . When a structure is 
moved to memory from tape, the records that it occupied on 
tape are no longer available. A tally of these dead records 
is kept; and when the ratio of inactive to active records ex- 
ceeds 1/4, the tape is automatically compacted onto the other 
unit used for auxiliary storage, eliminating the inactive 
structures. The new unit becomes the current auxiliary tape 
unit. Storage for data list structures thus alternates be- 
tween tapes SYSES1 and SYSES2 . (Note: Inactive data list 
structures at the end of the tape are written over by J107, 
and are not counted in the active/inactive ratio.) 

The last 13 cells printed by the post mortem contain pertinent 
information about auxiliary data storage usage. These cells 
have internal addresses and are, in order: 

1. Number of times compacting occurred. 

2. Total number of records eliminated by compacting. 

3. Number of times next write position was updated. 
k. Number of records eliminated by updating. 

5. Number of J72 usages involving auxiliary. 

6. Number of J74 usages involving auxiliary. 

7. Number of J105 usages (J100 and J101 use J105 automatically, 
if necessary) . 

8. Number of J107 usages. 

9. Total number of words written by J107. 

10. Total number of records written by J107. (Records vary 
in length up to 125 words.) 

11. Record number of next write position. 

12. Current position of auxiliary tape. 
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13. List of structures currently on auxiliary, each followed 
by the number of records occupied by the structure. The 
first entry represents the dead records and is followed 
by the total number of such records. 

A new primitive, J139, has been added to enable the programmer 
to detect when available space has dropped below a specified 
minimum without counting the entire H2 list: 

J139 TEST IP THE NUMBER OF CELLS ON LIST (1) EXCEEDS 
WT~. (6) is assumed to be an integer data term. 
List (1) is counted until the count exceeds (0) , 
at which point H5 is set + . If list (1) is ex- 
hausted before this happens, H5 is set -. 



ARITHMETIC PROCESSES. Pages 55-57 

J110, Jill, J112, J113, J115, and J116 admit integer, floating, 
and octal data terms only. The type of the result (0) of J110- 
J113 is as follows: 



(1) (2) (0) 

Floating Any Floating 

Any Floating Floating 

Integer Integer Integer 

Integer Octal Integer 

Octal Integer Octal 

Octal Octal Octal 



J125 admits integer, floating, and octal data terms only. 

J128 will translate integer to floating, floating to integer, 
octal to integer, and integer to octal. In addition, floating 
and BCD data terms are "translated" to octal by setting P»3, 
and octal is "translated" to BCD by setting P-2. All other 
translations (BCD to integer, octal or BCD to floating, and 
integer or floating to BCD) are illegal. 



INPUT-OUTPUT CONVENTIONS, Pages 61-64 

Input and output units are assigned as described above. Proc- 
esses J140-J146 are not available. 



MONITOR POINTS AND TRACING . Pages 64-67 

No console signals are provided. Terminate for restart is 
not available. The program may be terminated by a manual TRA 
SYS ERR or SYSERR-2. Sense bit 32-TRACE signals full trace. 
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Trace speed is approximately 80 IPL-V instructions per second. 
Bit 32-NTRACE gives normal tracing modes. 

No provision i3 made for suppressing tracing. 

On the printed trace line, if S or (0) is a local symbol, this 
is indicated by an asterisk following the symbol; e.g., 2765». 
The designated symbol S is printed only if Q-l or 2. 



PRINT PROCESSES. Pages 69-72 

The output unit for J150, J151, J152, J153, and J155 is con- 
trolled bv the integer data term named in W20. If this data 
tern Is 0* the output unit is SYSPOT. Other units are specified 
as follows: 



1 

2 

3 
4 

5 



or 11 
or 12 
or 13 
or 14 
or 15 



SYSAR1 
SYSAR2 

SYSAR3 
SYSAR4 

SYSAR5 



6 or 16 

7 or 17 

8 or 18 

9 or 19 
10 or 20 



SYSBR1 
SYSBR2 
SYSBR3 
SYSBR4 

SYSBR5 



If the data term is 10 or less, the print line 1W24 is written 
on the specified tape for subsequent off-line printing i.e., 
lie first character is the spacing character as determined from 
1W22. If the data term is greater than 10, the referenced line 
^ written on the specified tape for ^sequent off-line punch- 
ing' i.e.. the first 80 characters are written out without a 
spicing control character. All tapes written by these processes 
a?e written with an end-of-file at the end of the IPL-V run. 

If a list structure with a local name is printed by J150, the 
converted na££ will be 9-0. Sublists of any list structure 
are always numbered consecutively starting with 9--L. 

Data terms are always printed in the format given on page 71, 
with £hTIxcept?on of floating point numbers The fonjt for 
these is "-.123456-12"; plus signs are not printed. The field 
length is thus either 10 or 11 columns. 

When local symbols are printed (except in the case of those 
translated by J150), they are followed by an asterisk. 

cell W24 initially names an internal print buffer of 120 cells 
(one character pe? cell) length. Other print lines may be 
assigned by type 3, Q-l cards at initial loading. 

J158 and J159 leave 1W25 pointing to the first column to the 
left of the entered information. 



Revised 11/17/61 



709/7090 IPL-V 
PROGRAM DESCRIPTION 



This write-up is in two parts: the first describing the 
nature of the IPL-V system as a subroutine, the second in- 
cluding deviations from and additions to the basic IPL-V 
manual . 



PART I 

CALLING SEQUENCE 



cs 




1 


m 


LDI 


CNTRL 


cs 








TSX 


AO, 4 


cs 


+ 


1 


ta 


• • • 




cs 


+ 


2 




PZE 


SYSPIT,,SYSMIT 


cs 


+ 


3 


a 


PZE 


SYSPOT, , PAGES 


cs 


+ 


4 


JB 


PZE 


SYSES1,,SYSES2 


cs 


+ 


5 


at 


• • • 




cs 


+ 


6 


«s 


PZE 


• * • , , SYSERR 


cs 


+ 


13 


m 


PZE 


SYSORG,,... 


cs 


+ 


29 


s 


Return 


cs 


+ 


37 


MS 


PZE 


SYSTSL , , » • • 



The above calling sequence is that used within the MockDonald 
operating system; hence its strange format. Words or parts 
of words indicated by are not significant. 



CONTROL BITS 

Bits 30-35 of CNTRL are placed in the sense indicator register 
for conveying information to IPL-V as to the nature of the run 
being made. Immediately below is given the meaning of these 
bits; their interpretation is explained in Part 2. 

Bit 35 0 LOAD 
Bit 35 1 RELOAD 
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Bit 34 0 NOT APE 
Bit 34 1 TAPE 



Bit 


33 


0 


LIST 


Bit 


33 


1 


NOLIST 


Bit 


31 


0 


NODUMP 


Bit 


31 


1 


DUMP 



NTRACE (Suppress all tracing.) 
TRACE (Trace everything.) 
STRACE or blank (Selective trace ... 
normal . ) 

SNAP (Execute 1W12 and 1W13 instead of 
tracing marked routines.) 



Bit 30 
c — 

0 
1 



Bit 32 
— 0~ 

1 

0 



CALLING SEQUENCE INFORMATION 

SYSPIT, SYSMIT, SYSMOT, SYSES1, SYSES2 are the locations of 
tape control words. These words must contain the address of 
the physical unit associated with the symbolic tape. (E.g., 
if SYSPIT is on physical unit B2, the control word would have 
an octal address of 02202.) Only the first three tapes are 
necessary for using the system. If the address is zero, the 
unit is interpreted as being unavailable. 

SYSTSL is the location of the tape status list for reserved 
tapes. It is arranged such that 

AXT CHANNEL, 2 (1 for Ch. A, 2 for Ch. B, etc.) 

AXT UNIT,1 (3 for Unit 3, etc.) 

CLA* SYSTSL, 2 

will put the address of the corresponding tape control word 
into the decrement of the accumulator. Tapes SYSAR1, 2, 3, 
4, 5, SYSBR1, 2, 3, 4, and 5 are interrogated. Again, a zero 
address is interpreted as meaning that the corresponding unit 
is unavailable. 

SYS ERR and SYSERR-2 are the locations to which the operator 
is to transfer in case of program error, loop, too much time, 
etc. Both SYSERR and SYSERR-2 are replaced with a transfer 
to the recovery routine for IPL-V; the contents of these cells 
is saved and restored. They must lie in the range 00001 - 
0007 7g. The entry from SYSERR attempts to give an IPL-V post 
mortem before exit; the entry from SYSERR-2 causes an immedi- 
ate exit from IPL-V. 

SYSORG is the name of a cell containing the location of the 
first word following the system in control. Memory up to loca- 
tion C (SYSORG) is left undisturbed by the execution of IPL-V 
(with the exception of cell zero) . 
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PAGES Is the location of a cell containing the approximate num- 
ber of pages of output expected. This number is multiplied by 
6k to give a line count. (A line count of zero is replaced 
with a count of 6000.) An error condition is sensed when the 
output (from assembly, tracing, J150, J151, J152, J153, or 
J155, printing or punching) exceeds the expected amount. The 
line count is then reset so that a post mortem may be printed. 



OPERATION OF THE IPL-V EXECUTIVE ROUTINE, AO 

1. All traps are disabled. 

2. The tape control words are Interpreted, and a table of tape 
information is constructed. 

3. Memory is saved on tape SYSMIT from locations lOOg-C(SYS0RG) . 

4. If the RELOAD option is called, memory is reloaded from 
SYSAR2. 

5. The remaining sense indicator bits are interpreted. 

6. Control is passed to the IPL-V system interpreter. 

7. At the conclusion of the IPL-V run (program finished, error, 
or manual transfer to SYSERR-2 or SYSERR), memory is restored 
from tape SYSMIT and control returned to word 29 of the call- 
ing sequence. 



NOTES 

Although the system has been organized so as to work within the 
MockDonald monitor system, it should be emphasized that it is 
in no way dependent upon any of the routines of that system. 
Only the tape control words of that system need be reproduced 
(in the format explained above) to gain complete independence 
of that system. 

All Input and output routines are contained within the IPL-V 
system itself. Data is read, in BCD, from tape SYSPITj output 
is written in BCD on tape SYSPOT. Neither tape is rewound, nor 
is an end-of-file ever written on SYSPOT. Tape SYSMIT is used 
for saving core and for auxiliary routine storage. SYSAR1, 2, 
3, 4, 5, SYSBR1, 2, 3, k, and 5 may be used by the IPL-V inter- 
preted program. See following section for details. 
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EXAMPLE 

Following is a complete calling sequence requiring no infor- 
mation from the MockDonald system: 



START 


LDI 


CNTRL 




TSX 


AO, 4 




PZE 






PZE 


SYSPIT 




PZE 


SYSPOT 




PZE 


SYSES1 




PZE 






PZE 


0,0,3 




PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 


SYSORG 




PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






TRA 


Out 




PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 






PZE 


SYSTSL 


CNTRL 


OCT 


23 


SYSPIT 


OCT 


2201 


SYSMIT 


OCT 


2202 


SYSPOT 


OCT 


2203 


SYSES1 


OCT 


1204 


SYSES2 


OCT 


1205 


SYSAR1 


OCT 


1201 


SYSAR2 


OCT 


1202 



(Manual Error Transfer to 3g or lg.) 



RELOAD , T APE , LIST , NTRACE , DUMP 
Unit Bl for SYSPIT 
Unit B2 for SYSMIT 
Unit B3 for SYSPOT 
Unit A4 for SYSES1 
Unit A5 for SYSES2 
Unit Al for SYSAR1 
Unit A2 for SYSAR2 



(Example) 



If Aux. Data Storage Used] 
If Aux. Data Storage Used) 
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SYSAR3 


OCT 


1203 Unit A3 for SYSAR3 


SYSAR4 


PZE 


SYSAR4 Not Used 


SYSAR5 


PZE 


SYSAR5 Not Used 


SYSBR1 


PZE 


SYSBR1 Not Used 


SYSBR2 


PZE 


SYSBR2 Not Used 


SYSBR3 


PZE 


SYSBR3 Not Used 


SYSBR4 


OCT 


2204 Unit B4 for SYS BR 4 


SYSBR5 


OCT 


2205 Unit B5 for SYSBR5 


SYSORG 


PZE 


16384 Save lower half of 




PZE 


CHNLB, 1 




PZE 


CHNLA, 1 


SY3TSL 


PZE 


Tape Status List 




PZE 


0,,SYSAR5 




PZE 


0,,SYSAR4 




PZE 


0,,SYSAR3 




PZE 


0,,SYSAR2 




PZE 


0,,SYSAR1 


CHNLA 


PZE 




PZE 


0,,SYSBR5 




PZE 


0,,SYSBR4 




PZE 


0,,SYSBR3 




PZE 


0,,SYSBR2 




PZE 


0,,SYSBR1 


CHNLB 


PZE 


PAGES 


DEC 


200 Approximate Number 



(If Used) 
(If Used) 
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PART II 



This write-up includes only deviations from and additions to 
the basic IPL-V manual, INFORMATION PROCESSING LANGUAGE - V 
MANUAL, Section II, Programmers' Reference Manual, A. Newell, 
Editor, Prentice -Hall, Inc., 1961 . Familiarity with this 
manual is assumed; references are to sections and page num- 
bers in this manual. 



INITIAL LOADING, Page 214 

This version is not set up to run multiple IPL-V jobs. Each 
run must begin with the execution of the calling sequence for 
IPL-V. References to bits 30-35 refer to the setting of the 
sense indicator register on entry to IPL-V. (See Part I.) 
The IPL-V program, set up as described on page 221, is assumed 
to be on tape SYSPIT, in BCD. This tape is not rewound prior 
to reading. 

All assembly, tracing, error, and po3t mortem output is off- 
line, on tape SYSPOT. This tape is never rewound, nor is an 
end-of-file written. This permits stacking of the IPL-V out- 
put with other jobs adhering to the same output conventions. 
Output from J 150, J151, J152, J153, and J155 may be on reserved 
tapes if so specified (see below). An end-of-file is written 
on reserved tapes so used, at the conclusion of the program. 



A TYPE 9 CARD (page 220) is treated as a type 1 comment card, 
as no multiple job provisions are included. 



TYPE 2 CARDS do not have the full flexibility described on 
pages 21 5 -21 6. Only the NAME and LINK fields are read; the 
first character of the NAME field must be the region symbol; 
the LINK field must contain the extent of the region. The 
first example on page 216 is the only acceptable format for 
type 2 cards. 



TYP E 3 CARDS (page 216), if they appear, must follow any type 
2 cards to which they refer. For Q«l, the number of words set 
aside for a print line may vary from 1 to 119 • One word is re- 
quired for each position in the print line. The word at SYMB 
is set to P=0,Q-0,SYM3=location of line,LINK=length of line. 
If, in addition, P is not zero or blank, the line is filled 
from the next one or two cards. The first 72 (or less) posi- 
tions are filled from cols. 1-72 of the next card; if the line 
length is greater than 72 positions, the remaining positions 
are filled from cols. 1-47 of the second following card. Q=2 
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ia used to reserve a block of storage for binary IPL-V routines 
written in machine language. LINK specifies the extent of the 
block; the starting position of the block will depend upon the 
number of locations previously assigned by type 2 or type 3 
cards. If this is the first card to reserve space, the origin 
will be at 100g. Q-3 is used to reserve a buffer for routines 
to be stored in auxiliary storage. LINK specifies the extent 
of the block; the starting position will again depend upon 
previous assignments. 



TYPE 5 CARDS do not have the full flexibility as specified on 
pp. 217-220. P must be zero or blank for standard IPL format, 
or 3 for absolute column binary format. Q is interpreted as 
described; however, there is a maximum of 150 local symbols 
and a maximum of 100 internal symbolics that may be used per 
routine or data list structure. 

SYMB does not control the input unit, and is disregarded unless 
regional . 

LINK character d is ignored; the only output from the assembly 
process is the listing on SYSPOT, as controlled by character c. 



TYPE 6 AND 7 CARDS are treated identically, as only slow aux- 
iliary routine storage is provided. If either P or Q is not 
zero or blank, they are treated as type 5 cards (i.e., data 
and binary programs may not be loaded to auxiliary storage.) 
If Q is zero or blank, the following routines are loaded into 
the auxiliary buffer, which must have been reserved by a type 
3, Q«3 card. Each routine is then written on tape SYSMIT 
(following the record which was used to save memory) . The 
head of a routine loaded to auxiliary is set to P =0,0-7, SYMB- 
number of this routine on the auxiliary tape. Routines placed 
on auxiliary storage are automatically called in by the inter- 
preter for execution and are automatically saved and reloaded 
by J166 and the reload processes. 



NOTE i TYPE 1 CARDS should not appear in the middle of a pro- 
gram or data list following a program or data card with a 
blank SYMB or LINK. This will lead to an error which is not 
detected at assembly time. (The blank LINK or SYMB is treated 
as zero.) 



ABSOLUTE BINARY INPUT . A type 5 card with P=3 indicates that 
a block of absolute, column binary cards follows. These must 
load into the space reserved by the single type 3, Q«=2 card 
at the beginning of the program. The last binary card must 
be a transfer card; the address is ignored, however. After 



IPL-V 

8 



the binary cards have been read, the symbols HO, JO, and WO 
are stored in the address parts of the first three cells of 
the reserved block. This permits the programmer to refer to 
these regions conveniently when coding machine language rou- 
tines. If no space has been reserved for machine language 
routines, the cards will still be loaded. This feature may 
be used to load into unused available space; care must be 
taken to terminate available space or to link in around the 
routines so loaded. When this option is used, the symbols 
HO, JO, and WO are placed in the address parts of cells -3, 
-2, and -1. 



ALTERNATIVE INPUT UNIT . Provision has been included for 
reading input from tape SYSAR1 in BCD format if desired. 
Sense indicator bit 34 controls this function. If bit 34 is 
TAPE when the program is first loaded, the IPL-V loader will 
initially read from tape SYSAR1 in BCD. The order and format 
of cards on this tape must be identical to that used for on- 
line reading of cards. When an end -of -file is encountered 
on this tape, the IPL-V loader will attempt to read from tape 
SYSPIT. Printing of the assembly of tape SYSAR1 may be sup- 
pressed by setting bit 33 to NOLIST; in this case only the 
header cards from SYSAR1 will print. If bit 33 is LIST, 
printing control is from character c of the header cards on 
the tape. 



EXAMPLE . A short IPL-V program is to be loaded and executed. 
The deck should be set up exactly as described and written 
on SYSPIT in BCD. Bit 34 should be NOTAPE. Execution of the 
IPL-V calling sequence will cause the program to be loaded 
and executed as described. 



EXAMPLE . A long IPL-V program is to be loaded and executed. 
A BCD tape should be prepared off-line; the deck set-up should 
be exactly as described, except that the final type 5 card 
should not be written on the tape. The data is followed by 
an end-of-file on this tape. To load and execute, this tape 
is mounted on unit SYSAR1. The final type 5 card is loaded 
on SYSPIT, with bit 34=TAPE, bit 35-LOAD. Loading and execu- 
tion will take place as described. 

For subsequent runs, with routines to be changed or new data 
added, the same tape SYSAR1 may be mounted, and the corrected 
routines and data loaded on SYSPIT before the final type 5 
card. Since the changed routines or data are read from SYSPIT 
after tape SYSAR1 has been read, the corrections will be made 
before interpretation begins. 
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INPROCESS LOADING (JI65) . Page 222 



Any restrictions that apply to initial loading also apply to 
inprocess loading. Note that type 2 and type 3 cards may not 
be loaded. New routines may be loaded to auxiliary storage, 
as may new copies of old routines. 

Unused regionals were returned to the end of available space 
at the end of the initial loading process. If new regionals 
are required when loading more routines and data with JI65, 
they should be reserved by type 3 cards at initial load. The 
locations of unused regional symbols returned to available 
space are still referenced by the internal symbol table, how- 
ever, and an error will not be detected if JI65 loads into 
them. All such references will be to cells on available space; 
this will result in an improperly constructed available space 
list and will usually lead to errors when the program is run- 
ning. 



J166 saves on the tape specified by the integer data term 
named (0) . If this data term is 0, memory is saved on tape 
SYSAR3 . Other allowable tapes are specified as follows: 



Other values of (0) will cause an error, as will reference to 
an unassigned tape. All of memory, plus any auxiliary routines 
or auxiliary data used, is saved on tape, and the program con- 
tinues from that point. The tape is rewound after writing, 
so that multiple occurrences of 3166 with the same input will 
cause the tape to be rewritten. Bit 31 of CNTRL (above) should 
be DUMP -if J166 is to be used. 

J167 is not available. 



RELOADING . Reloading is from the tape written by J166. The 
tape should be mounted on tape SYSAR2; bit 35=REL0AD is used 
to initiate the reload process. After reloading, control is 
returned to exactly the same place in the execution of J166 
as when memory was saved. 



EXAMPLE . A program is to be loaded, saved immediately for 
subsequent restart, and the program is then to be executed. 



SAVE FOR RESTART, Page 223 



1-SYSARl 
2«SYSAR2 
3«SYSAR3 
4=SYSAR4 
5«SYSAR5 



6=SYSBR1 
7-SYSBR2 

8=SYSBR3 
9-SYSBR4 

10«SYSBR5 
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On reloading, it is desired to make changes or corrections 
before execution. 

Include a one-word routine in the program as follows: 

NAME P Q SYMB LINK 

RO 10 9-1 

J166 J165 
9-1+0 1 0 

Place two type 5 termination cards at the end of the deck; 
the firsT with a SYMB of RO, the second naming the start of 
the program; bit 35-LOAD, bit 31-DUMP. Operation is then as 
follows: The program is read in and assembled, and interpre- 
tation begins with instruction RO. J166 will save memory on 
SYSAR3, and the program will continue with the interpretation 
of the instruction, which links to JI65. JI65 will read more 
routines and data, including termination cards. Since the 
only card remaining is a termination card, interpretation will . 
begin with the first instruction of the program. 

To reload, place the corrected routines (including any correc- 
tions to routines on auxiliary storage) or data lists on SYSPIT, 
preceded by the proper type 5, 6, or 7 header cards, and fol- 
lowed with the same two termination cards. The tape written on 
the first pass is mounted on tape SYSAR2. Bit 35»RELOAD, bit 
34=NOTAPE, bit 31-DUMP. Immediately after reload, interpreta- 
tion will continue at RO; and JI65 will read the corrections 
into memory. The first termination card will repeat the save 
process on SYSAR3; the second will initiate the interpretation 
of the corrected program. 



NOTE : The same procedure may be used when the initial program 
Toad" is from SYSAR1 in BCD. Bit 3^ should be NOTAPE on reload, 
however, so that JI65 will be prepared to read corrections from 
SYSPIT rather than SYSAR1. 



TAPE UNIT SUMMARY 
TAPE SYSPIT. BCD input tape (never rewound) . 

TAPE SYSPOT . BCD output tape (never rewound; no end-of -files) . 

TAPES SYSES1-2. Auxiliary storage for data list structures 
(J105, J107, 7108) . 

TAPE SYSAR1. Alternate BCD input tape (under control of bit 



TAPE SYSAR2 . Reload tape (under control of bit 35) . 

TAPE SYSMIT . Auxiliary routines, if loaded, are written follow- 
lng the record which is used to save memory on entry to IPL-V. 
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TAPE SYSAR3 . Normal save-f or-restart tape (written by J166) . 

TAPES SYSAR1-5, SYSBR1-5 . As used by J150, J151, J152, J153, 
J155, Jlbb. If used by other than J166, and end-of-file is 
written at end of program. 



OPERATION OP THE INTERPRETER 

Interpretation begins within the system by interpreting the 
instruction 

000 Xxx J7, 

where Xxx is the routine named on the final type 5 termina- 
tion card. Interpretation will continue until the J7 is linked 
to, at which time the program will print PROGRAM RAN TO COM- 
PLETION on the output tape. Other terminations will occur if 
the programmer executes the routine J7, or if the interpreter 
or a primitive process detects any one of a number of errors. 
In case of such a termination, the reason will be printed on 
the output tape, followed by an IPL-V POST MORTEM. The post 
mortem consists of a print-out of the lists named on the list 
named by system cell W23. Initially this list names all the 
system cells, HO through W29, plus 13 cells containing infor- 
mation about J105-J107 usage (see auxiliary data storage). 
In addition, the current print line, 1W24, is printed. The 
programmer may replace this list with another list, or add sym- 
bols to this list. Control is returned to 29,4 of the IPL-V 
calling sequence after execution of an IPL-V program. 



ERROR TRAP, J170, Page 224 

The error trap function is not provided; see above for error 
action. 



SYSTEM CELLS j Page 177 
Exceptions and additions are as follows: 
HO initially contains the symbol 0. 

H2 will initially be about 24,000 cells for a 32K machine. 
H3 is set to 1 by the initial loader. 
H4 records current auxiliary routine. 
H5 is initially set to J4(+) . 
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H6 is used by machine language recursive routines to hold 
index 4. 

H7 is a data term which is set to the current level. It is 
set to 0 by the initial loader, and by J165 if cards are read. 

H8 is the hide-out cell used by the generator processes. 

H9, H10, Hll, and H12 are generator-working cells. 

WO ... W9 initially contain the symbol 0. 

W10 initially names a data term for random number generation. 
W12 ... W15 initially contain JO. 
Wl6, W17, W19 are not used. 

W18 controls the input unit; 0=SYSPIT, non-zero=SYSARl . 

W20 initially names a data term equal to 0. 

W21 initially names a data term equal to 1. 

W22 initially names a data term equal to 1. 

W23 initially names a list of the system cells. 

W24 initially names a 120-word internal buffer for line print- 
ing. 

W25 initially names a data term equal to 1. 
W26 ... W28 are not used. See above. 
W29 initially contains the symbol 0. 

GENERATOR PROCESSES, Pages 182-185 

The generator trace context and level context are handled as 
described, provided that generators are always executed from 
the left. Both generators and subprocesses may be on auxiliary 
storage; subprocesses must have regional names if on auxiliary. 



J102, Page 194 

Not available. May be coded as described in Part I of the 
Manual, page 82, if desired. 
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AUXILIARY STORAGE FOR DATA LIST STRUCTURES . Page 194 

J106 Is not available, as only slow storage Is provided. 

A data list structure is filed as a series of binary records 
on the current auxiliary tape unit; the address of this unit 
(SYSES1 or SYSES2) is controlled automatically. The head of 
a list structure filed in auxiliary storage contains this ad- 
dress in SYMB, the number of the first record of the structure 
on the tape appears in LINK, and Q«7. When a structure is 
moved to memory from tape, the records that it occupied on 
tape are no longer available. A tally of these dead records 
is kept; and when the ratio of inactive to active records ex- 
ceeds 1/4, the tape is automatically compacted onto the other 
unit used for auxiliary storage, eliminating the inactive 
structures. The new unit becomes the current auxiliary tape 
unit. Storage for data list structures thus alternates be- 
tween tapes SYSES1 and SYSES2. (Note: Inactive data list 
structures at the end of the tape are written over by J107, 
and are not counted in the active/inactive ratio.) 

The last 13 cells printed by the post mortem contain pertinent 
information about auxiliary data storage usage. These cells 
have internal addresses and are, in order: 

1. Number of times compacting occurred. 

2. Total number of records eliminated by compacting. 

3. Number of times next write position was updated. 

4. Number of records eliminated by updating. 

5. Number of J72 usages involving auxiliary. 

6. Number of J74 usages involving auxiliary. 

7. Number of J105 usages (J100 and J101 use J105 automatically, 
if necessary) . 

8. Number of J107 usages. 

9. Total number of words written by J107 . 

10. Total number of records written by J107 . (Records vary 
in length up to 125 words.) 

11. Record number of next write position. 

12. Current position of auxiliary tape. 



IPL-V 



13. List of structures currently on auxiliary, each followed 
by the number of records occupied by the structure. The 
first entry represents the dead records and is followed 
by the total number of such records. 

A new primitive, J139, has been added to enable the programmer 
to detect when available space has dropped below a specified 
minimum without counting the entire H2 list: 

J139 TEST IF THE NUMBER OF CELLS ON LIST (1) EXCEEDS 
(t) . (0) is assumed to be an integer data term. 
List (1) is counted until the count exceeds (0), 
at which point H5 is set +. If list (1) is ex- 
hausted before this happens, H5 is set -. 



ARITHMETIC PROCESSES, Pages 197-199 

J110, Jill, J112, J113, JH5, and J116 admit integer, floating, 
and octal data terms only. The type of the result (0) of J110- 
J113 is as follows: 



(1) (2) (0) 

Floating Any Floating 

Any Floating Floating 

Integer Integer Integer 

Integer Octal Integer 

Octal Integer Octal 

Octal Octal Octal 



J125 admits integer, floating, and octal data terms only. 

J128 will translate integer to floating, floating to integer, 
octal to integer, and integer to octal. In addition, floating 
and BCD data terms are "translated" to octal by setting P»3, 
and octal is "translated" to BCD by setting P«2. All other 
translations (BCD to integer, octal or BCD to floating, and 
integer or floating to BCD) are illegal. 



INPUT-OUTPUT CONVENTIONS, Pages 203-206 

Input and output units are assigned as described above. Proc- 
esses J140-J146 are not available. 



MONITOR POINTS AND TRACING, Page 206-209 

Sense switch 5 is provided as a console signal to terminate 
the job. When SW 5 is depressed, the interpreter immediately 
executes the routine named by W14, then gives a post-mortem 
dump and quits. The programmer may provide any program for 
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W14, including J166 as a means of terminating for restart. A 
manual TRA SYS ERR also terminates a job with a post-mortem, 
while TRA SYSERR-2 terminates without one. 

Indicator bits 30 and 32 control tracing. 00=NTRACE=suppress 
all tracing; 01«TRACE«=trace everything; 10=3TRACE (or blank) « 
selective tracing (normal); ll=SNAP=execute the programs in 
W12 and W13 for routines marked with Q=3 but omit the detailed 
trace printout. 



The output unit for J150, J151, J152, J153, and J155 is con- 
trolled by the integer data term named in W20. If this data 
term is 0, the output unit is SYSPOT. Other units are specified 
as follows: 



If the data term is 10 or less, the print line 1W24 is written 
on the specified tape for subsequent off-line printing; i.e., 
the first character is the spacing character as determined from 
1W22. If the data term is greater than 10, the referenced line 
is written on the specified tape for subsequent off-line punch- 
ing; i.e., the first 80 characters are written out without a 
spacing control character. All tapes written by these processes 
are written with an end-of-file at the end of the IPL-V run. 

If a list structure with a local name is printed by J150, the 
converted name will be 9-0. Sublists of any list structure 
are always numbered consecutively starting with 9-1* 

Data terms are always printed in the format given on page 71, 
with the exception of floating point numbers. The format for 
these is "-.123456-12"; plus signs are not printed. The field 
length is thus either 10 or 11 columns. 

When local symbols are printed (except in the case of those 
translated by J150) , they are followed by an asterisk. 

Cell W24 initially names an internal print buffer of 120 cells 
(one character per cell) length. Other print lines may be 
assigned by type 3, Q«l cards at initial loading. 

J158 and J159 leave 1W25 pointing to the first column to the 
left of the entered information. 



PRINT PROCESSES , Pages 211-214 



1 or 11 » SYSAR1 

2 or 12 - SYSAR2 

3 or 13 - SYSAR3 

4 or 14 - SYSAR4 

5 or 15 ■ SYSAR5 



6 or 16 « SYSBR1 

7 or 17 « SYSBR2 

8 or 18 * SYSBR3 

9 or 19 - SYSBR4 
10 or 20 - SYSBR5 



IPL-TO-MACHINE-LANQUAQE COMPILER - OPERATING INSTRUCTIONS 



The compiler is designed to take a complete IPL program deck 
(with the exception of absolute binary input cards) and convert 
to symbolic machine language for input to SCAT. The binary deck 
produced by SCAT becomes input to IPL for actual running. The 
deck set-up described below should be used to go from IPL to 
absolute binary in one 7090 run. 



DECK SET-UP: COMPILE PASS 



# JOB 6351* etc. 

# ASSIGN A5-SYSAR1 



# ASSIGN A6-SYSAR2 



# ASSIGN B5-SYSBR1 



# IPL 



May be 

on 

SYSAR1 S 
or 

SYSPIT 



RELOAD 
Type 

5 



Type 2 and 3 
cards for IPL 
program. 



IPL program and 
data, with usual 
type 5 cards. 



(Optional. The program to be compiled 

may be on SYSPIT, in which case this % ' 

assign card should be omitted. See below.) 

(Tape 579 is the reload tape for the 
compiler, IPL version; 
Tape 1291 is the reload tape for the 
compiler, compiled into machine language.) 

(Utility tape. The compiler output is 
on this tape, which becomes the input 
to SCAT.) 

(IPL control card.) 



SYMB 



(Note: 



(IPL start card. 

BO for input from SYSPIT, 

X3 for input from SYSAR1.) 



The order of these cards 

must be preserved. See below.) 



(Program to be compiled.) 



[Type 5 start card.] (Terminate compilation.) 

# REWIND SYSBR1 (Rewind output tape.) 

# SCAT N0G0,SQZ,ABS,LIST,SYSBR1 (SCAT control card.) 
[blank card] 



The absolute program Is designed to load Into available space 
Immediately following the space reserved by type 2 and 3 cards. 
Since these type 2 and 3 cards control the absolute addresses 
which will be assigned both by SCAT and by IPL during running 
phase, it is essential that this deck is identical for both 
compile and execution passes. However, the compiler does not 
recognize print line cards (which follow type 3* PQ- 11 cards), 
so these should HOT be present when compiling, unless they "have 
a 1 in the TYPE col, (41). 

The SCAT code output by the compiler is as follows: 



ORG 

BSS 

BSS 
XXX" 

XXX 



64 



n 



n 



(corresponds to IPL origin) 

(one for each type 2 or 3 card that 
actually assigns space, two for 
print line reservations.) 



(SCAT code corresponding to routines 
or data. The original IPL code 
appears as commentary.) 



YYY 

YYY 
END 



(Subroutines required by the compiled 
code, EQU cards for references to the 
IPL system, new head for H2 list.) 



(SCAT END cards) 



This code should give no SCAT errors except ORIGIN IN MONITOR. 



Note that X PL code which is "aware" of the IPL system (e.g., makes 
references to HI, or treats data as program or vice versa, etc.) 
will probably not run correctly when compiled. 

Cell H6 Is used by the compiled code as the machine language 
CIA list. 

There is no advantage to compiling data list structures other 
than the fewer cards required when the list structure is in binary. 

The speed ratio obtained by compiling an IPL code is in the 
neighborhood of 1.8 to 1. 



DECK SET-UP: RUNNING PASS 



JOB 6^31, etc, 



IPL etc. 



(IPL control card.) 



Type 2 and 3 cards 
from compile run, 
In identical order. 



Type 

5 



PQ SYMB 
30 



£ Binary cards produced by the compile pass.] 



^Other IPL routines, data, absolute binary, etc.] 



5 



Xxx (IPL start card.) 



10-13-61 



LINE READ PRIMITIVES 



The line read primitives provide a means of reading a BCD 
card under control of an IPL-V program and translating selected 
fields into IPL symbols or data terms. 



CONTROL CELLS 

1W24 names the current read line. ("Read lines" and "print 
lines" are identical and interchangeable. Lines for either or 
both purposes are specified by Type 3, Q=l cards.) 

1W25 is a decimal integer data term specifying the left 
column of the current input field. 

1W30 is a decimal integer data term specifying the size 
(number of columns) of the current input field. 



PRIMITIVE DEFINITIONS 

*Jl80 READ LINE . The next input record is read to line 

. (The record is assumed to be BCD.) Column 1 
of the record is read into column 1 of the read 
line, and so forth. H5 is set + . If no record 
can be read (end of file condition), the line is 
not changed and H5 is set - . 

*Jl8l INPUT LINE SYMBOL . The IPL symbol in the field 

starting in column 1W25 and of size 1W30, in line 
1W24, is input to HO j H5 is set +. The symbol is 
regional if the first (leftmost) column holds a 
regional character; otherwise It is absolute 
internal. All non-numerical characters except in 
the first column are Ignored. If the field is 
entirely blank, or Ignored, there is no input to 
HO, and H5 is set -. In either case, 1W25 is 
incremented by the amount 1W30. 

»Jl82 INPUT LINE DATA TERM (0). The field specified as 
in Jltil is taken as the value of a data term; 
input data term (0) is set to that value and left 
as output (0). H5 is set +. The data type of input 
(0) determines the data type of the output. If 
the Input (0) is a decimal or octal Integer or 
BCD the read line field is Interpreted as that type. 
Any other data type is treated as BCD. In composing 
BCD data terms, the field is left -Justified and the 
full data term conpleted with blanks on the right 
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if necessary. If the specified field exceeds five 
columns, the rightmost five columns are taken as 
the field. In composing decimal and octal integer 
data terms, non-numerical characters are ignored; 
if the resulting information exceeds the capacity 
of the data term, the rightmost digits are retained. 
If the read line field is entirely blank (or non- 
numerical, for integer data types), (0) is cleared 
(to blanks for BCD, to zero for integer) and H5 is 
set -. In either case, 1W25 is incremented by 
the amount 1W30. 

*J183 SET (0) TO NEXT BLANK . (0) is taken as a decimal 
integer data term. Cine 1W24 is scanned, left 
to right, starting with column 1W25+1, for a blank. 
One is added to (0) for each column scanned, 
including that in which the scanned-for character 
"blank" in JI83) is found. (0) is left as output 
0). H5 is set + if the character is found in the 
line, and - if it is not. 

(Thus, if input (0) - 1W25, after scanning output 
(0) will specify the column holding the scanned- 
for character. If input (0) - decimal integer 0, 
after scanning output (0) will be the size of a field 
beginning in column 1W25 and delimited on the right 
by the next occurrence of the scanned-for character.) 

»Jl84 SET (0) TO NEXT NON-BLANK . Same as JI83, except 
scans for any non -blank character . 

»Jl85 SET (1) TO NEXT OCCURRENCE OF CHARACTER (0) . Same 
as J183, except scans for character (0), counting 
into decimal integer data term (1). Input (l) Is 
left as output (0). If input (0) is a regional 
symbol, its region character is the character 
scanned for; if input (0) is Internal, its last 
(low-order) digit is the character scanned for. 

♦j 186 INPUT LINE CHARACTER . The character in column 1W25 
of line Is Input to HO; H5 is set +. If the 

character is numerical that internal symbol is input; 
if the character Is non -numerical, the zeroth symbol 
in the region designated by the character Is input. 
If the character is a blank, there is no input and 
H5 is set -. In either case, 1W25 is not 
advanced. 

»J189 TRANSFER FIELD . The field in line 1W24, starting 
in column 1W25 and of size IW30, Is transferred 
to line (0), starting in column 1W21; H5 is set + . 
If the entire field cannot be transferred (line (0) is 
too short), as much is transferred as can be, 



3 



and H5 is set -. In either case, 1W25 is set to the last 
column transferred plus one. 



IMPLEMENTATION 

The line read primitives are coded in SCAT for use with 
the RAND version of IPL-V for the 7090. Since the code uses 
parts of the IPL-V loader and interpreter as subroutines, 
equivalent addresses must be specified for several of the 
symbols used when line read is assembled separately from 
the rest of the system. (See the program listing for details.) 

Because an interpreter subroutine is used in converting 
input, an error condition (UNDEFINED SYMBOL DURING LOADING) 
will occur if the symbol input by Jl8l or J186 does not lie 
within a defined region. 



USE OF THESE PRIMITIVES 

The current deck of line read absolute binaries is 
assembled into a block beginning at 23000 1Q . The binaries 
may be loaded during IPL loading following a Type 5, P-3 
card; no Type 3 primitive block reservation card is required. 
(Of course, available space should not have been used as 
niah as 23000, n prior to this loading.) The symbolic version 
of these primitives may be assembled into another absolute 
location if so desired. 
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# 






* 












* 












# 






J 


BOOL 


63170 


HO 


BOOL 


62705 


J3 


BOOL 


70774 


J4 


BOOL 


71000 


L2 


BOOL 


65036 


L6 


800L 


65207 


L7 


BOOL 


65262 


L902 


BOOL 


64472 


L99 


BOOL 


65012 


P3 


BOOL 


67146 


S4 


BOOL 


57351 


55 


BOOL 


57353 


V 


POOL 


62722 


W21 


EGU 


W+21 


W24 


FQU 


W + 24 


ri c. ' 


EQU 


W + 25 


* 






* 






* 












* 






* 







ORG 
PZE 



THE FOLLOWING EQUIVALENCE CARDS UITH THE 
APPPOPRIATF ABSOLUTE ADDRESS) MUST BE SUPPLIED 
WHEN LINE READ IS ASSEMBLED SEPARATELY FROM THE 
IPL-V 7090 SYSTEM. WHEN LINE READ IS BEING 
ASSEMBLED WITH THE IPL-V SYSTEM * THEY MUST 
(REPEAT* must ) BE OMITTED, 



READS A CARD INTO L902 BUFFER 
CONVERTS 5 BCD COLS- TO REG. + REL. 
ASSIGN CELL TO SYMBOL FROM TABLES 
SUFFER FOR UNPACKED BCD IMAGE 



SIGNAL* ZERO IF INTERNALS 
LOOKS UP REGIONAL SYMBOL I 
PRESERVES HO 
RESTORES HO 



ABSOLUTE 
N TABLE 



23000 
0»0»YLAST 



# 



THE PRECEDING EQUIVALENCE CARDS (WITH THE 
APPROPRIATE ABSOLUTE ADDRESS) MUST 6t SUPPLIED 
WHEN LINE READ IS ASSEMBLED SEPARATELY FROM THE 
IPL-V 7090 SYSTEM. WHEN LINE READ IS BEING 
ASSEMBLED WITH THE I PL— V SYSTEM * THEY MUST 
(REPEAT* MUST) BE OMITTED. 

ORIGIN OF LINE READ PRIMITIVES 
PFMOVE SECTION FROM AVAILABLE SPACE 
YO READS A CARD INTO BUFFER L902 AND 
THEN TRANSFERS THE INFORMATION TO THE 
1W24 BUFFER. 



YO SXD 
TSX 
TRA 
LAC 
LDQ 
CLA 
AXC 
TSX 
LXD 
TRA 

Y0001 LXD 
TRA 

Y0002 PZE 
Y0003 PZE 



Yl 



SXD 
CLA 
ST A 
LXA 



Y0003*4 

L2.4 

Y0001 

W24*4 

0*4 

Y0002 

1*3 

YY9*4 

Y0003»| 

J4 

Y0003»4 
J3 

L902-1 *0»80 
0*0*** 



Y1001 »4 
W30 
*+l 
**»1 



READ CARD 
NO CARD 

TO BUFFER INFORMATION TO MO 
FROM BUFFER INFORMATION TO ACC 
SET STARTING COLUMNS 
TRANSFER INFORMATION 



ZEROTH WORD* 0» CARD SIZE 
X4 

Yl INPUTS LINE SYMBOL TO HO AND SETS H5 



FIELD SIZE TO XI 
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SXA 
TIX 
TSX 

Y1004 LAC 

CLA' 
ADD 
STO 
LXD 
TRA 

Y1003 LAC 
CLA 
LAC 
ADD 
ANA 
COM 
OAX 
TSX 
TMI 
PDX 
TXH 
ACL 
STP 
STZ 
TSX 
STA 
TSX 
TSX 
CAL 
$T*A 
STP 
TRA 

Y1005 TSX 
TRA 

Y1O01 P^E 
Y1002 PZE 

* 

* 

Y? 



Y1002*1 

Yl003»ltl 

Y£>»4 

W2 5 # 2 

0*2 

Y1002 

0*2 

Y1001 *4 
1 »4 
W24»2 
0»2 
W 2 5 * 2 

n»2 

YI36 
0*2 

L6+1 »4 

Y1005 

0.1 

*+? » 1 *0 

YI9C 

Y1001 

L99 

L7»4 

Y1001 

S4 »4 

J4»4 

Y1001 

HO 

HO 

Y1004 
J3»4 
Y1004 
#*>0»** 



Y2004 



SXD 


Yl 001*4 


L AC 


HO* 2 


CAL 


0*2 


A.N A 


Y2002 


TZE 


Y2003 


SUB 


Y2020 


TZE 


Y2030 


TSX 


YY2 » 4 


TXL 


#+2*1*5 


AXT 


. 5*1 


PXD 


0*0 


AXT 


5*4 


ALS 


6 


ADD 


0*2 


TXI 


*+l *4*~1 



SAVE FIELD SIZE 

TRANSFER IF NOT SINGLE CHARACTER 
INPUT LINE CHARACTER 



ADVANCE 1W25 



1C0M FIRST COLUMN TO X2 
CONVERT SYMBOL 
TRANSFER IF ALL BLANKS 

TRANSFER IF REGIONAL 
0 = 4 

SET INTERNALS ABSOLUTE 
GET SYMBOL 

PSV HO 



SYMBOL »X4 

HOLDS FIELD SIZE 

Y2 INPUTS LINE DATA TERM (0)» SETS H5. 

(IF NOT INTEGER OR OCTAL* ASSUMt BCD) 



TRANSFER INTEGER 
TRANSFER OCTAL 

2CFIRST TO X2. FIELD SIZE TO XI 



CLEAR FIELD 

SET UP FULL FIELD SIZE 

ADD IN CHARACTER 
REDUCE FIELD SIZE 
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TXI *+l»2»-l MOVE TO NEXT COLUMN 

TIX *-4,l,l TEST IF DONE 

T XL *+4,4»0 TEST IF FULL FIELD 

ALS 6 

ADD YL696 ADD IN BLANK 

TIX *-2*4,l 

ADD Y2006 SET PQ 

LAC HO»2 

STO 0»2 SET NEW ALPHA DATA TERM 

SUR Y2O07 

TZE * + 3 TRANSFER IF ALL BLANKS 

Y2014 TSX J4»4 

TR A Y1004 ADVANCE 1W25 

Y2015 TSX J?»4 

TRA Y1004 

Y2003 TSX YY2.4 ?C FIRST TO X2> FIELD SIZE TO XI 

STZ Y2008 CLEAR SUM 

AXT 0»4 COUNT NON— BLANKS 

Y2011 CLA 0»2 

CAS YL694 TEST IF NON-NUMERIC 

TRA Y2012 

TRA Y2012 

LDQ Y2008 

MPY YL694 SUMXIO 
XCA 

ADD 0»2 ADD NEXT DIGIT 

STO Y2008 

TXI *+l*4*l 

Y2012 TXI *+l,2»-l M °VE T0 NExT COLUMN 

TIX Y2011»ltl TRANSFER IF NOT DONE 

CLA Y7008 

ANA Y2009 

Y2022 ADD YI87 SET PQ 

LAC HO»2 

STO 0»2 

TXH Y2014,4»0 TEST IF ANY NON-BLANKS 

TRA Y2015 

Y2030 TSX YY2*4 ZCFIRST TO X2t FIFLD SIZE TO XI 

STZ Y2008 CLEAR SUM 

A XT 0»4 COUNT NON -BLANKS 

Y2(ni CLA 0*2 

CAS Y2021 TEST IF NON-OCTAL 

TRA Y2032 

TRA Y2032 

CLA Y2008 

ALS 3 

ADD 0*2 ADD NEXT DIGIT 

STO Y2008 

TXI *+l»4»l 

Y2032 TXI *+l»2»~l MOVE TO NEXT COLUMN 

TIX Y2031»l»l 

CLA Y2008 

ANA Y2009 

ADD Y2020 SET Q 
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TRA 


Y2022 


• /. u <c u 


OCT 


D30000000000 


' 2 1 




a 

o 


Y 0 f>0? 


OCT 


070000000000 


1 v/ v O 


OCT 


120000000000 


Y?007 


OCT 

• 


126060606060 


Y2008 


PZE 


#-* 


Y2009 


OCT 


7777777777 


YY2 


CLA 


W3 0 




STA 


* + l 




LXA 


**,1 




SXA 


Y1002»l 




LAC 


W24»2 




CLA 


0*2 




LAC 


W2 5 *2 




ADD 


0*2 




PAC 


0»2 




TRA 


1 *4 


* 












* 






Y3 


sxo 


Y3001t4 




TSX 


YYY3*4 


Y3006 


SXA 


Y3002*l 




LDG 


YL696 


Y3007 


TSX 


YY3»4 




TRA 


Y3003 




TSX 


J4*4 


Y3005 


SXA 


Y3004*l 




LAC 


H0*1 




CLA 


0*1 




ADD 


Y3002 




SUB 


Y3004 




STO 


0*1 




LXD 


Y3001 »4 




TRA 


1 »4 


Y3003 


TSX 


J3»4 




TRA 


Y3005 


Y3001 


PZE 


0*0,** 


Y3002 


PZE 


*# 


Y3004 

* 
* 


PZE 


** 


# 

Y4 


SXD 


Y3001*4 




TSX 


YYY3»4 




SSM 




* 

# 


TRA 


Y3006 


* 

* 

Y5 


SXD 


Y3001 *4 



P = 3 

LIMIT ON OCTAL DIGITS 
MASK FOR P 

EMPTY ALPHA DATA TFRM 

ALPHA ALL BLANKS 

HOLDS SUM FOR INTEGER CASE 



FIELD SIZE TO XI 
SAVE FIELD SIZE 

BUFFER START TO HO 

ADD FIRST COLUMN 

2C FIRST ADDRESS TO X2 



Y3 SETS (0) TO NEXT BLANK BLGINNING WITH 
COLUMN 1W25+1* AND SETS H5. 



SET UP SCAN 

SAVE NO. OF COLUMNS 

SET UP BLANK 

SCAN 

SET H5+ 

SAVE NO. OF UNS CANNED COLUMNS 



RESET (0) 



SET H5- 
X4 

HOLDS INITIAL NO. OF COLUMNS 
HOLDS NO. OF COLUMNS UNSCANNED 

Y4 SETS (0) TO NEXT NON-BLANK 



SFT UP SCAN 

SET FOR NON-IDENTITY 



Y5 SETS (1) TO NEXT OCCURRENCE OF <0)» 
LEAVES INPUT (1) AS OUTPUT (0) 
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Y5004 



Y5002 



Y5001 



* 

» 
* 



Y6 



CLA 

STA 
CLA 
TSX 
TRA 
STA 
TSX 
TSX 
SXA 
LDO 
TRA 
LDO 
PXD 
DVP 
TRA 
PZE 



Y6004 



Y6003 



Y6001 
Y6002 

* 
* 

Y9 



SXD 

TSX 

STA 

CLA 

STO 

SUB 

TN2 

LXD 

TRA 

TSX 

CLA 

SUB 

TPL 

CLA 

ACL 

STA 

STP 

LXD 

TRA 

LXA 

PXD 

TSX 

TRA 

PZE 

PZE 



HO 

Y5001 
Y5001 
P3»4 

Y5002 

Y5 001 

S5 *4 

YYY3»4 

Y3a02*l 

Y5001 

Y3007 

Y5001 

0*0 

YL694 

Y5004 



Y6001 »4 

YYfe*4 

*+l 

*#,2 

Y6002 

YL696 

*+3 

Y6001*4 

J3 

S4»4 

YS002 

YL694 

Y6003 

Y6002 

YI90 

HO 

HO 

Y6001*4 
J4 

Y6002»2 

0»2 

L7*4 

Y6004 

0*0.** 
*# 



GET REGIONAL SYMBOL 
NOT REGIONAL 

RESTORE HO 
SET UP SCAN 

CHARACTER TO MO 



GET LOW ORDER DIGIT 

HOLDS SEARCH CHARACTER 

Y6 INPUTS LINE CHARACTER TO HO AND SETS 
H5. 



SAVE CHARACTER 

TRANSFER IF NOT BLANK 

CHARACTER BLANK* SFT H5- 
PSV HO 

TRANSFER IF NOT INTERNAL 
Q = 4 



SXD 
LAC 
LDQ 



Y9EXT 

H0»4 

0*4 



SET UP REGIONAL SYMBOL 
ASSIGN EQUIVALENT 

X4 

HOLDS CHARACTER 

Y9 TRANSFERS THE FIELD IN 1W24* STARTING 
IN COLUMN 1W25» FIELD SIZE 1W30 TO LINE 
(0)» STARTING IN COLUMN 1W21 



TO BUFFER INFORMATION TO MO 
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Y9002 



Y9001 
Y9FXT 



CLA 
STA 
STA 
LAC 
CLA 
STA 
LAC 
CLA 
STA 
LXA 
SXD 
LAC 
CLA 
STA 
CLA 
TSX 
PXD 
PDC 
SXA 

lxd 

TRA 
PZE 

PZE 



W25 

Y9C02 

*+l 

***2 

W21 

*+l 

W30 
* + l 

Y9001 »4 

W?4»4 

0»4 

Y9001 
Y9001 
YY9,4 

0.2 
0*2 

**»2 
Y9EXT*4 

S5 



>0»** 



FROM START COLUMN TO X2 



TO START COLUMN TO XI 



NO. OF COLUMNS TO ACC. WORD 

FROM BUFFER NAME TO ACC • WORD 
TRANSFER INFORMATION 

RESET 1W25 

RESTORE HO 

FROM BUFFER CONTROL 

X4 

YY3 SCANS BUFFER FIELD. 
ACC=8UFFER CONTROL WORD 
MO=SYMBOL 

SIGN(ACC)=+ FOR I DENT I TY »-FOR UN IDENT I TY 
IR1=N0. OF COLUMNS TO BE SCANNED 
2CIR2=COLUMN BEFORE FIRST TO BE SCANNED 
ON EXIT — 

+ 1 IF NOT SUCCESSFUL » +2 If 7 SUCCESSFUL. 
IR1 = NO. OF COLUMNS NOT YET SCANNED 
2CIR2 = LAST COLUMN SCANNED 



YY3 


STQ 


YY301 




STA 


YY302 




XCA 


0 


YY305 


TXL 


YY303 ♦ 1 »0 




TXI 


*+l*2»-l 




TXI 


*+ltlt-l 


YY302 


CLA 


#*»2 




CAS 


YY301 




TRA 


*+2 




TRA 


YY304 




TOP 


YY305 




TRA 


2»4 


YY304 


TOP 


2»4 




TRA 


YY305 


YY303 


TRA 


1 »4 


YY301 




#* 



SIGN TO MQ 

TRANSFER IF ALL SCANNED 
MOVE TO NEXT COLUMN 
REDUCE UNSCANNED COUNT 

COMPARE NEXT WITH SYMBOL 



NOT EQUAL » TEST IF IDENTITY REQUIRED 

FOUND REQUIRED COLUMN 

EQUAL ♦ TEST IF IDENTITY REQUIRED 



CHARACTER BEING COMPARED 

YYY 3 SETS UP FOR SCAN ♦ EXCEPT FOR SYMBOL IN 
MQ AND SIGN OF ACC FOR IDENTITY OR NOT 
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* 
* 



( IS + NORMALLY) 



YYY3 


sxo 


YYY31 »4 






TSX 


YY6»4 






PDX 


0*1 


LAST COLUMN TO X 1 




SXD 


# + 1 »2 






TXI 


*+l.l >** 


SUBTRACT COLUMN BEFORE 




LXD 


YYY31»4 






TRA 


1 *4 




YYY31 


P2E 


0*0*** 


X4 








YY6 LOADS ?C OF 1W25 (COLUMN 


* 






2C OF SUFFER SYMBOL IN IRl» 


* 






BUFFER CONTROL WORD IN ACC. 


* 

YY6 


LAC 


W2*tl 






CLA 


W25 






STA 


# + 1 






LAC 


**♦? 






CLA 


0*1 






TRA 


1»A 





* 

# 

♦ 

# 
* 
* 
# 
* 



IN IR2, 



YY9 TRANSFERS INFORMATION BETWEEN BUFFERS. 
At ACC)"2ER0TH WORD OF FROM BUFFER. 
D(ACC)=NO. OF COLUMNS TO TRANSFER. 
A ( MQ ) =ZEROTH WORD OF TO RUFfER. 
D(MQ)sLAST COLUMN OF TO BUFrER. 
X1 = 2C0M OF STARTING COLUMN » TO BUFFER. 
X2=2COM OF STARTING COLUMN, FROM BUFFER. 
OUTPUT X2=2COM OF NEXT COLUMN » FROM BUF. 
H5 SET WHETHER ALL TRANSFERRED. 



YY9 


SXD 


YY9XT*4 






STO 


YY9FM 






STO 


YY9T0 






CLA 


YY904 






STT 


YY9T0 


SET T AG = 1 




CLA 


YY905 






STT 


YY9FM 


SET TAG =2 




LDC 


YY9T0,4 






TXI 


*+ 1 »4»-l 






SXD 


YY902*4 


SET BUFFER LIMIT 




LXD 


YY9FM *4 






TXI 


*+l*4,l 


NO. OF COLUMNS TO X4 


YY901 


TlX 


YY902»4*1 


TEST IF ALL TRANSFERRED 




LXD • 


YY9XT,4 






TRA 


J4 




YY902 


TXH 


YY903* 1 »** 


TEST IF BUFFER FULL 




LXD 


YY9XT»4 






TRA 


J3 




YY903 


CLA* 


YY9FM 






STO* 


YY9T0 




YY904 


TXI 


*+l ♦ 1 >-l 


(TAG USED AS CONSTANT) 


YY905 


TXI 


YY901*2*-1 


(TAG USED AS CONSTANT) 
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YY9FM 


PZE 


** 


HOLDS 


Wa TD 


r* *» E 


♦# 


HOLDS 


YYOVT 


p7 P 


o*o»** 


X4 


Y I 86 


w 

D7 C 


1 


SYMBOI 


VT fl7 

1 1 O I 


PON 




0*1 


YTon 


FOR 






VI 

ILOJt 


PZE 


10 




Yl 


PZE 


9 ' 




YL696 


OCT 


60 


BLANK 


Yl A*iT 


PZE 


0»0>*+l 






ORG 


W+30 






FOR 




INPUT 




ORG 


J + 180 






FVE 


Y0 


J180 




FVE 


Yl 


J181 




FVE 


Y? 


J1B2 




FVE 


Y3 


J183 




FVE 


Y4 


J184 




FVE 


Y5 


J185 




FVE 


Y6 


J186 




BSS 


? 






FVE 


Y9 


J189 




END 


0 





FIELD CONTROL CELL 



ooc 



00( 



XJXrtJ U 3 V 

'.n j — 



BAKER 



B060 



TAPE ASSIGNMENT AS OF 09-18-61 



JOB 



6331 
6331 



6331 
6331 



REEL ASSIGNED RELEASE DESCRIPTION 



COMMENTS 



2 80H 
543H 



09-13-61 
07-31-61 



IPL-V SQZ-7 
COMPILER BCD 



579H 
596H 



09-12-61 
08-01-61 



IPL COMPILER RESTART 
COMPILER PPT 



6331 
6331 



1061H 
1075H 



09-13-61 
09-12-61 



IPL-5 SAP OUTPUT 
IPL-V SQZ-8 



6331 
6331 



1193H 
1246H 



09-12-61 
09-12-61 



IPL-5 SAP INPUT 
IPL-V SQZ-8 SOT 



6331 
6331 



1291H 
1331H 



08- 21-61 

09- 12-61 



ML COMPILER RESTART 
IPL-V SQZ-8 POT 



010 REELS 



( 



i 



5_ 

4 



V 



6331 J19N 



08/25/61 
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63466 


1 




ORG 


J + 19C 








63466 


-1 


ccooo 


0 


56535 


2 




FVE 


J190 


J19C 


SET P OF (0) = P OF 11), LEAVE 10) 




63467 


-1 


occoo 


0 


56540 


3 




FVE 


J191 


J191 


SET Q OF (0)=Q OF (1) ' 




63470 


-1 


ccooo 


0 


56543 


4 




FVE 


J192 


J192 


SET PQ OF (0)=PQ OF { 1) 




63471 


-1 


ccooo 


0 


56546 


5 




FVE 


J193 


J193 


SET SYKB CF {0)=SYM8 OF (1) s 




63472 


-1 


ccooo 


0 


56551 


6 




FVE 


J194 


J194 


SET LINK OF (0)=LINK OF 11) 




63473 


-1 


ccooo 


0 


56554 


7 




FVE 


J195 


J195 


TEST P OF (0)=P CF ( 1 ) 




63474 


-1 


ccooo 


0 


56557 


8 




FVE 


J196 


J196 


TEST Q OF {0)=Q CF tl) 




63475 


-1 


cccoo 


0 


56562 


9 




FVE 


J197 


J197 


TEST PC OF (0)=PG OF ( 1 ) 




63476 


-1 


ccooo 


0 


56565 


10 




FVE 


J198 


J198 


TEST SYM8 OF (0)=SYMB OF (1) 




63477 


-1 


00000 


0 


56570 


11 




FVE 


J199 


J199 


TEST LINK OF {0)=LINK UF (1) 












56534 


12 




ORG 


2390C 








56534 


0 


56661 


0 


CCOOO 


13 


-I 


PZE 


C,Q,R2S8+1 


LINK |AV. SP. AROUND J190'S 




56535 


-0 


5C000 


0 


56537 


14 


J190 


CAL 


* + 2 








56536 


0 


02000 


0 


56573 


15 


+ 1 


TRA 


Rl 








56537 


-3 


77777 


0 


77777 


16 


+ 2 


SVN 


C-1,0,-1 


P MASK 




5654C 


-0 


5CC00 


0 


56542 


17 


J191 


CAL 


* + 2 








56541 


0 


02000 


0 


56573 


18 


+ 1 


TRA 


Rl 








56542 


0 


77777 


7 


77777 


19 


+2 


PZE 


C-1,7,-1 


Q MASiK 




56543 


-0 


5CC00 


0 


56545 


20 


J 192 


CAL 


* + 2 








56544 


0 


O2C0O 


0 


56573 


21 


+ 1 


TRA 


Rl 








56545 


0 


77777 


0 


77777 


22 


+ 2 


PZE 


0-1.0.-1 


PC PAlSK 




56546 


-0 


50000 


0 


56550 


23 


J193 


CAL 


*+2 








56547 


0 


02000 


0 


56573 


24 


+ 1 


TRA 


Rl 








56550 


-3 


77777 


7 


CCOOO 


25 


+ 2 


SVN 


0,7,-1 


S YMB |1ASK 




56551 


-o 


5C00O 


o 


56553 


26 


J194 


CAL 


» + ? 




\ 




56552 


0 


02000 


0 


56573 


27 


+ 1 


TRA 


Rl 








56553 


-3 


CCCCO 


7 


77777 


28 


+ 2 


SVN 


0-1.7 


LINK 


JlASK 




56554 


-0 


5CC00 


0 


56556 


29 


J195 


CAL 


*+2 








56555 


0 


02000 


0 


56621 


30 


+ 1 


TRA 


R? 








56556 


0 


COOOO 


7 


CCOOO 


31 


+ 2 


PZE 


0,7 


P MAS 


I 




56557 


-o 


50000 


o 


56561 


■h? 


J 196 


f.Al 


* + ? 








5656C 


0 


02G00 


0 


56621 


33 


+ 1 


TRA 


R2 








56561 


-3 


ooono 


0 


ooono 


34 


+ ? 


SVN 




q ma<; 


1 - 




56562 


-0 


50000 


0 


56564 


35 


J197 
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